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INTRODUCTION 


Le développement de la micro-informatique familiale a été marqué, 
en 1984, par l'apparition sur le marché français des premiers ordina- 
teurs Amstrad. Leur succès croissant tient probablement à la qualité 
du produit, mais aussi au fait qu’Amstrad offre un système clés en 
main pour un prix des plus abordables. Fini le temps où, addition- 
nant le prix de l'unité centrale et celui des unités périphériques indis- 
pensables que l’on se réservait pour plus tard (moniteur, lecteur de 
cassette ou de disquette), on arrivait à une somme dépassant large- 
ment le budget que l’on s'était imparti pour finalement disposer d’un 
matériel n’offrant pas toutes les possibilités auxquelles on s'attendait. 
Avec Amstrad, plus d'économies de bouts d’octets ! Le système que 
l’on achète est directement utilisable et parfaitement autonome. Fin 
1985, le CPC 464, seul produit disponible jusque-là, a fait deux petits. 
ou plutôt deux grands : les modèles CPC 664 et CPC 6128. Les trois 
modèles de la gamme Amstrad sont tous construits autour du même 
microprocesseur, le bon vieux Z80 qui a fait depuis longtemps ses 
preuves et qui reste parmi les plus performants des microprocesseurs 
8 bits. 


TROIS MODÈLES, UNE MÊME PHILOSOPHIE 
MAIS QUELQUES DIFFÉRENCES... 


Au-delà de leur design (les couleurs du clavier s'assagissent sensi- 
blement sur les derniers modèles), il est incontestable que la diffé- 
rence essentielle concerne le support de mémoire morte intégré à 
chacun de ces ordinateurs : cassettophone sur le CPC 464, lecteur 
de disquette (format 3 pouces d’Hitachi) sur les modèles CPC 664 
et CPC 6128. En plus de sa plus grande fiabilité, le lecteur de dis- 
quette permet un accès aux fichiers incomparablement plus rapide 
que le magnétocassette. || convient toutefois de noter une limitation 
étonnante pour un produit de cette qualité : le BASIC Amstrad ne 
comporte aucune instruction ou fonction destinée à la constitution 
et à la gestion de fichiers à accès aléatoire ! On devra donc se 
contenter des fichiers séquentiels.. Amstrad commercialise d'autre 
part l’unité de disquette DDI-1 (munie d’une interface) qui fait 
(presque) ressembler le CPC 464 à ses grands frères. Réciproquement, 
il est possible de connecter un magnétophone standard (prise DIN) 
sur les modèles CPC 664 et CPC 6128. 

Les trois modèles disposent de 64K de mémoire vive dont environ 
43K sont disponibles pour les programmes utilisateur, 16K étant réser- 
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vés à la mémoire écran. Le CPC 6128 dispose de 64K de mémoire 
RAM supplémentaires utilisables comme disque virtuel. L'interpré- 
teur BASIC se trouve, sur les trois machines, dans les 32K de mémoire 
morte (ROM). Cette mémoire morte contient également, dans le cas 
des modèles CPC 664 et CPC 6128, le système d'exploitation du disque 
AMSDOS. Le rôle principal d'un système d'exploitation (de disque) 
est d'établir une série de conventions d’entrées/sorties entre l'unité 
centrale et le contrôleur du disque. AMSDOS est assez rudimentaire. 
Cependant, Amstrad livre également un second système d'exploita- 
tion (sur disquette) pouvant se substituer à AMSDOS. Il s’agit du 
fameux CP/M de Digital Research. Le modèle CPC 6128 est vendu 
avec un troisième système d'exploitation (en plus des deux premiers !), 
CP/M+, qui, comme son nom l'indique, procure un plus (indispen- 
sable) à l'utilisateur. 


LES SYSTÈMES D'EXPLOITATION DU DISQUE : 
AMSDOS, CPIM 2.2 et CP/M+ 


Les trois systèmes d'exploitation ne sont pas concurrents mais bien 
complémentaires. Selon l'application que l'on souhaite développer, 
on aura grand intérêt à choisir le système le mieux adapté à cette 
application. 

AMSDOS est assez rudimentaire en ce sens qu'il ne possède aucune 
commande permettant d'effectuer une gestion de fichiers digne de 
ce nom (copie de fichier, copie de disque, etc.). Il ne permet pas 
davantage le formatage des disquettes, opération préalable à toute 
utilisation de celles-ci. Il dispose par contre d’une particularité très 
intéressante : les commandes AMSDOS sont directement accessibles 
à partir du BASIC. Ce système d'exploitation permet donc une utili- 
sation optimale des possibilités graphiques et sonores du BASIC 
Amstrad. Une rubrique de ce livre (Chapitre 3) est consacrée aux 
commandes AMSDOS. 

Les programmes BASIC sont effacés de la mémoire centrale dès que 
l'on se trouve sous CP/M. CP/M et BASIC sont totalement indépen- 
dants. Il existe une commande du système AMSDOS (donc accessi- 
ble en BASIC) permettant de passer sous CP/M. Réciproquement, la 
commande CP/M ‘’AMSDOS"’ provoque le retour sous le système 
d'exploitation résident. CP/M ne permettant pas l'accès direct aux 
commandes BASIC, il est impossible d'exploiter, sous ce système, les 
possibilités graphiques et sonores de l’Amstrad. En revanche, CP/M 
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dispose de toutes les commandes de copie et de formatage néces- 
saires. || permet également de gérer l'interface série et les entrées/sor- 
ties concernant l’ensemble des unités périphériques. CP/M dispose 
enfin de quelques utilitaires comme un éditeur de texte (ED), ou un 
mini-assembleur (ASM). La véritable programmation en langage d’'as- 
semblage nécessite cependant de recourir à un logiciel plus perfor- 
mant, comme par exemple le ZEN d’Avalon Software (distribué en 
France par Sybex). 

L'un des avantages de pouvoir exploiter Amstrad sous CP/M est que 
l'on a ainsi accès à une foule de logiciels (ou de langages) profes- 
sionnels performants qui ont été développés sous ce système d’ex- 
ploitation (lorsque ces logiciels ont été transférés dans le format encore 
peu répandu des disquettes Amstrad). Signalons par exemple que la 
société Fraciel a adapté sur Amstrad une version du Turbo Pascal. 
Cependant, un nombre important de ces logiciels professionnels se 
trouvent un peu à l’étroit dans les 64K de mémoire RAM des modèles 
CPC 464 et CPC 664. Ce n’est plus nécessairement vrai dans les 128K 
du CPC 6128. CP/M+ permet de gérer ces 128K et étoffe considéra- 
blement les possibilités de CP/M, en ce qui concerne tant les 
commandes nouvelles que la zone laissée libre à l'utilisateur. 


LE BASIC LOCOMOTIVE, UN BASIC QUI A PRIS 
LE BON WAGON... 


C'est la société Locomotive Software qui a développé le BASIC 
résident de l’Amstrad. Ce BASIC supporte tout à fait la comparaison 
avec la référence qu'est devenu le BASIC Microsoft, au moins en ce 
qui concerne ses versions les plus populaires (MSX, Thomson, ..). 
Si l’on peut regretter l'absence de sprites (qui facilitent l'animation) 
et celle d'instructions permettant le tracé direct de cercles (CIRCLE) 
ou de rectangles (BOX ou LINE), toutes les autres instructions gra- 
phiques essentielles sont présentes (au moins sur les modèles CPC 
664 et 6128), avec en plus la possibilité de gérer l'écran en mode 
multifenêtre (pas tout à fait à la façon du Macintosh tout de même) 
grâce aux instructions WINDOW et WINDOW SWAP. La palette de 
couleurs dispose de 27 couleurs différentes et la résolution graphique 
est très bonne (640x200 pixels, en haute résolution) pour une 
machine de cette gamme. Le générateur de son est un synthétiseur 
à trois canaux disposant de huit octaves (General Instrument, AY3 
8910). Ce circuit est également utilisé par un grand nombre d'ordi- 
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nateurs concurrents. Cependant, l’interpréteur BASIC de l’Amstrad 
a été conçu pour permettre une exploitation maximale des possibili- 
tés de ce circuit. La contrepartie de ce contrôle très précis est une 
certaine complexité au plan de la programmation des sons. Une rubri- 
que très détaillée de cet ouvrage regroupe les instructions et fonc- 
tions afférentes à la gestion du son (Chapitre 3, le son Amstrad). Signa- 
lons enfin une particularité très intéressante du BASIC Locomotive : 
l'ordinateur possède une horloge interne à laquelle sont associés 
quatre chronomètres indépendants. Des instructions d’interruptions 
logicielles permettent de simuler une utilisation multitâche de 
l'ordinateur. 

Les modèles CPC 664 et CPC 6128 disposent de quelques instruc- 
tions BASIC supplémentaires par rapport au modèle antérieur. Ces 
instructions nouvelles sont essentiellement dirigées vers le graphisme. 
D'autres instructions déjà existantes ont bénéficié, sur les modèles 
récents, de quelques options supplémentaires (PEN, DRAW, PLOT, 
sl 


ORGANISATION DE L'OUVRAGE 


Ce livre s'adresse tant aux débutants qu'aux programmeurs confir- 
més. Ceux-ci y trouveront la syntaxe complète de toutes les 
commandes, fonctions et instructions du BASIC Amstrad (et de 
AMSDOS). De nombreux programmes de démonstration, simples ou 
élaborés, illustrent un grand nombre d'instructions. 

Les débutants trouveront, au Chapitre 2, le rappel des notions élé- 
mentaires concernant la programmation en BASIC. Des informations 
complémentaires sont données tout au long de l'ouvrage. La notion 
de fichier est par exemple développée sous les rubriques 
‘Commandes AMSDOS"’ et ‘’OPENIN’” ; les notations binaire et hexa- 
décimale sont illustrées et commentées en regard des fonctions BIN$ 
et PEEK. 

Toute classification étant arbitraire et souffrant nécessairement d'ex- 
ceptions, l’organisation suivante a été adoptée dans cet ouvrage : les 
instructions, fonctions et commandes du BASIC Amstrad sont pré- 
sentées par ordre alphabétique, certains regroupements ayant cepen- 
dant été effectués, soit pour des raisons thématiques, soit pour des 
raisons de syntaxe ou d'utilisation. Par exemple, les instructions LEFT$ 
et RIGHT$, qui effectuent le même type d'opération et qui s'emploient 
dans des syntaxes identiques, forment ici une seule et même rubrique. 
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De même, les instructions et fonctions classées sous la rubrique 
‘Gestion des erreurs’ sont toujours utilisées ensemble (et dans le 
même but) dans un programme. 

Pour trouver une information concernant un sujet précis, la méthode 
la plus simple consiste à se reporter à l'index alphabétique donné 
à la fin de l'ouvrage. Des renvois fréquents à d’autres rubriques sont 
inclus dans la description de bon nombre d'instructions. Ce mode 
d'organisation ne nécessite pas, bien au contraire, une lecture linéaire 
de l'ouvrage. Selon ses connaissances et ses centres d'intérêt, le lecteur 
pourra l’aborder par une rubrique ou par une autre. 

L'écriture du programme le plus simple met en jeu plusieurs ins- 
tructions. Pour autant, il n’est pas nécessaire de connaître toutes les 
instructions du BASIC Amstrad pour pouvoir commencer à écrire de 
petits programmes. Les programmes d'application donnés dans ce 
livre ont été conçus dans cet esprit. Le programmeur chevronné 
pourra par exemple trouver décevant qu'aucun graphisme n'accom- 
pagne le programme de jeu illustrant la rubrique ‘Opérateurs logi- 
ques”. Il n’aura par contre aucune difficulté à ajouter lui-même les 
instructions correspondantes. Le débutant aura quant à lui la satis- 
faction de comprendre, dans ses moindres détails, l'élaboration d’un 
programme complet n’utilisant que les instructions qu'il connaît (s’il 
a suivi l’ordre suggéré ci-après). 

Les différentes rubriques alphabétiques sont regroupées ci-après par 
thèmes. En abordant successivement (et dans l’ordre) les rubriques 
correspondant à chacun de ces thèmes, le débutant pourra trouver 
une aide précieuse pour un apprentissage progressif de la program- 
mation. Lorsqu'une rubrique contient plusieurs mots clés ou instruc- 
tions, tous ne sont pas ici nécessairement répertoriés. Les parenthèses 
signalent des instructions devant normalement figurer dans le thème, 
mais dont il est préférable de réserver l'étude à un autre sujet. 


COMMANDES ET INSTRUCTIONS D'USAGE GÉNÉRAL 


AUTO, CAT, DELETE, EDIT, LIST, TRON et TROFF, NEW, RENUM, 
RUN, END, CONT, REM, STOP, CLEAR 
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STOCKAGE ET CHARGEMENT D'UN PROGRAMME 
SUR CASSETTE OÙ SUR DISQUE 


CHAIN, LOAD, MERGE, SAVE, (Commandes AMSDOS) 


MISE EN FORME DE L'AFFICHAGE A L'ÉCRAN OU SUR L'IMPRIMANTE 


BORDER, CLS, COPYCHRS, CURSOR, DEC$, INK, LOCATE, MODE, 
POS et VPOS, PRINT, PRINT USING 

SPEED INK, SYMBOL, SYMBOL AFTER, SPC, TAB, WIDTH, 
WINDOW, WINDOW SWAP 

ZONE 


OPÉRATIONS LOGIQUES, ARITHMÉTIQUES ET BASES DE CALCUL 


MOD, DEF FN, fonctions arithmétiques, DEG et RAD, PI, RANDOMIZE 
Opérateurs logiques 


: 
Z 
& 
® 

® 
RE 
m 
X 
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INSTRUCTIONS DIRIGÉES VERS LE CLAVIER 


INKEY, INKEY$, INPUT, LINE INPUT 
KEY, KEY DEF, SPEED KEY 


BRANCHEMENTS ET BOUCLES 


IF... THEN..ELSE, GOTO, GOSUB/RETURN, ON...GOSUB et 
ON...GOTO 

FOR/NEXT, WHILE/WEND 

Gestion des erreurs et DERR 
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ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP 
(ON SQ GOSUB), (AFTER...GOSUB), (EVERY...GOSUB) 


GESTION DU TEMPS 


AFTER...GOSUB, DI, El, EVERY..GOSUB, REMAIN, TIME 


DÉCLARATION, ORGANISATION ET MANIPULATION DES DONNÉES 


DEFtype, DIM, ERASE, FRE, LET 
READ/DATA, RESTORE, (WRITE) 


MANIPULATION DES CHAÎNES DE CARACTÈRES 


ASC, INSTR, LEN, VAL 
CHR$, LEFT$ et RIGHTS, LOWERS et UPPERS$, MID$, SPACE, 
STRING, STR$ 


FICHIERS 


OPENIN, OPENOUT, CLOSEIN, CLOSEOUT, EOF, WRITE 


ADRESSAGE DIRECT DE LA MÉMOIRE EN BASIC 


(2 
© 
3 
3 
[et] 
5 
2. 
8 
> 
st 
D 
®. 
© 
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HIMEM, MEMORY, PEEK, POKE, @ 


— 16 - 


GRAPHISME, SON ET MANETTES DE JEU 


CLG, DRAW et DRAWR, FILL, FRAME, GRAPHICS PAPER, 
GRAPHICS PEN, MASK, MOVE et MOVER, ORIGIN, PLOT et PLOTR, 
TAG et TAG OFF, TEST et TESTR, XPOS et YPOS 

Le son Amstrad 

JOY 


PROGRAMMATION EN LANGAGE MACHINE ET 
GESTION DES ENTRÉES/SORTIES 
CALL, WAIT, INP et OUT 


CONVENTIONS D'ÉCRITURE 


Le format donné pour chaque instruction, commande ou fonction 
utilise les conventions d'écriture suivantes : 


e le (ou les) mot clé (qui doit être tapé tel quel) est écrit en 
majuscules ; 


e les éléments où paramètres inclus entre les symboles < et > sont 
facultatifs (les signes < et > ne doivent naturellement pas être tapés). 


Les nombres (en général des adresses) suivis de la lettre H syÿmbo- 
lisent des nombres hexadécimaux. Dans un programme, la lettre H 
doit être remplacée par la fonction &H (voir la rubrique BINS). 

Lorsque aucune indication contraire n’est donnée, la rubrique (ou 
plus généralement l'information fournie) concerne aussi bien le CPC 
464 que le CPC 664 ou le CPC 6128. 
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PROGRAMMER EN BASIC 
SUR AMSTRAD 


L; première partie de ce chapitre est destinée à initier le débutant 
à la conception et à l'élaboration d’un programme BASIC. Des infor- 
mations complémentaires importantes sont par ailleurs données tout 
au long de l'ouvrage. Ce mode d'organisation permettra au lecteur 
qui suivrait l’ordre suggéré dans l’Introduction de mettre tout de suite 
en pratique les premières connaissances acquises. 

Ce chapitre se poursuit par une description sommaire de l'éditeur 
Amstrad, outil fondamental pour l'écriture et la correction de lignes 
de programme. Un glossaire rappelle finalement la définition d'une 
vingtaine de mots courants du vocabulaire informatique. 


NOTIONS ÉLÉMENTAIRES DE PROGRAMMATION EN BASIC 


Supposons que l’on veuille calculer le résultat de l'opération 
suivante : 


28,492 x 4/ 5,39 
L'ordinateur permet d'effectuer ce calcul de deux manières 
différentes. La première consiste à taper au clavier les caractères 
suivants (en respectant exactement la syntaxe) : 
PRINT 28.492 + 4 | 5.39 
Après avoir pressé la touche Enter (équivalente à la touche retour 
chariot du clavier de machine à écrire), on voit le résultat de l’opéra- 
tion s'afficher à l'écran : 


21.1443414 


Le même résultat peut être obtenu en procédant comme indiqué 
ci-dessous, c’est-à-dire en créant un (tout petit) programme : 


10 PRINT 28.492 + 4 | 5.39 
20 END 


Après avoir tapé ces deux lignes (chacune devant là aussi se terminer 
par un retour chariot), écrivons le mot : 


RUN 
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et pressons une fois encore la touche Enter. Si tout s’est bien passé, 
le résultat de l’opération doit de nouveau s'afficher à l'écran. 

La première manière de procéder consiste à utiliser l'ordinateur en 
mode direct (encore appelé mode immédiat ou mode commande). 
La seconde utilisation correspond au mode programme. On remarque 
que, dans l’un et l’autre modes, le signe multiplié et les virgules 
séparant la partie entière de la partie décimale des nombres doivent 
être respectivement remplacés, en langage BASIC, par un astérisque 
(x) et par un point (.). D'autre part, en mode direct, il ne suffit pas 
de taper : 


28.492 » 4 | 5.39 - 


pour que le résultat de l'opération soit affiché. L'ordinateur sait cal- 
culer l'expression demandée mais il ne sait pas quoi faire du résultat. 
Il prend ici le signe égal comme un symbole d'affectation d’une valeur 
(l'expression à calculer) à une variable ou à une constante qui ne 
lui est pas fournie. Il est par contre possible d'écrire : 


C = 28.492 » 4 | 5.39 
PRINT C 


Dans un premier temps, le résultat du calcul est assigné comme 
valeur à la variable C. Il est ensuite demandé à l'ordinateur d'afficher 
à l'écran (c'est l’objet du mot PRINT) la valeur de cette variable. 

En algèbre, les deux relations : 


C = 28.492 x 4j 5.39 
et 

28.492 x 4/ 5.39 = C 
sont correctes et équivalentes. Il n’en est pas nécessairement de même 
en BASIC. Supposons que la deuxième ligne soit entrée et que l’on 
tape ensuite : 


PRINT C 


La valeur 0 sera alors affichée. Pourquoi ? 
Revenons au petit programme de démonstration. On remarque 
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qu'en mode programme, chaque ligne commence par un numéro. 
C'est une des caractéristiques obligatoires de ce mode. Lorsque nous 
écrivons : 


28.492 + 415.39 = C 
PRINT C 


l'ordinateur interprète la première ligne comme étant une ligne de 
programme et son analyseur syntaxique la transcrit en : 


28 0.492 » 4] 5.39 = C 


c'est-à-dire qu’à la ligne 28 d'un programme en train d’être écrit, le 
résultat de l'opération (0,492 x 4/ 5,39), c’est-à-dire la valeur 0,3651, 
est assigné à la variable C. Lorsque l’on demande ensuite à l’ordina- 
teur d'afficher à l'écran la valeur de C (grâce à PRINT C), on revient 
alors en mode direct puisque PRINT € n’est pas précédé d’un numéro 
de ligne. On pourrait penser que la valeur 0,3651 (et non 0) devrait 
dans ce cas s'afficher. Il n’en est pas ainsi pour la raison suivante : 
il y a bien en mémoire centrale de l'ordinateur un programme 
(constitué d’une seule ligne ayant le numéro 28), mais pour que ce 
programme réalise les opérations auxquelles il est destiné, sa présence 
en mémoire est une condition nécessaire mais non suffisante. || faut 
en outre demander à l'ordinateur de l’exécuter, ce que l’on fait en 
écrivant en mode direct, une fois que toutes les instructions ont été 
entrées, le mot RUN (comme dans le premier exemple). Tant que 
le programme n'a pas été exécuté, toutes les variables sont égales 
à O, d’où la valeur de C. 

PRINT, END et RUN sont trois des quelque 140 mots clés (ou mots 
réservés) constituant le langage de programmation BASIC utilisé sur 
l'Amstrad. Ce vocabulaire, d'origine anglo-saxonne, est généralement 
assez signifiant par rapport à la fonction réalisée, pour peu que l’on 
possède quelques notions élémentaires d'anglais. Dans le cas 
contraire, le handicap est de peu d'importance ; il est très rapide- 
ment surmonté par un minimum de pratique de la programmation. 

Le mot PRINT commande à l'ordinateur d'effectuer une action ; 
il s’agit donc d’une instruction. PRINT peut être utilisé aussi bien en 
mode programme qu’en mode direct. On parlera d’une instruction 
programmable et exécutable. D’autres instructions sont spécifique- 
ment réservées au mode programme (instructions programmables). 
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Au contraire, certains mots clés tels que RUN ne peuvent être 
employés qu’en mode direct. On réservera à ces derniers le nom de 
commandes. Une instruction peut être formée de plusieurs mots clés, 
comme par exemple ON ERROR GOTO. 

Une autre catégorie de mots clés doit être mentionnée : il s’agit 
des fonctions, qui sont généralement exécutables et programmables 
et qui peuvent être soit algébriques (COS, EXP, CSNG, ..), soit propres 
à la programmation (PEEK, STR$, etc.). Une fonction se caractérise 
par le fait qu’elle renvoie une valeur représentant le résultat d’une 
opération préprogrammée dans les circuits de l'ordinateur. 

Il faut enfin savoir qu’en mode direct une seule instruction ou 
commande peut être exécutée à la fois, ce qui signifie qu’il faut 
attendre le résultat de la première (qui est affiché dès que la touche 
Enter est pressée) avant d'entrer la seconde. 

Les règles énumérées ci-dessous doivent être respectées lors de 
l'écriture d’un programme en BASIC Amstrad. Ces règles sont d’ail- 
leurs valables pour la grande majorité des autres versions de ce langage 
de programmation : 


e Une ligne de programme peut comporter plusieurs instructions ; 
celles-ci doivent alors être séparées par deux points (:). 


e Une ligne de programme ne peut contenir plus de 255 caractères, 
y compris les espaces et le caractère retour chariot terminal qui 
n'est pas imprimé mais qui sert à entrer la ligne écrite en mémoire 
centrale de l'ordinateur. 


+ Chaque ligne de programme doit être numérotée (entre O et 65529). 
Les numéros indiquent l’ordre dans lequel les lignes sont enregis- 
trées en mémoire. 


e Les numéros de lignes doivent respecter la logique d'exécution du 
programme. Par exemple, l'instruction destinée à faire imprimer 
le résultat d’un calcul ne doit pas être rencontrée par le programme 
avant l'instruction qui réalise ce calcul. 


e L'exécution du programme commence à la ligne ayant le numéro 
le plus faible et continue par ordre de numéros croissants (sauf 
lorsqu'un branchement est rencontré). 


+ L'incrément entre deux lignes successives est quelconque. || n’a 
pas non plus besoin d'être constant entre toutes les lignes. 
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e L'ordre d'entrée des lignes en mémoire centrale de l'ordinateur 
peut être quelconque lors de l'écriture du programme (tant que 
ces lignes sont correctement numérotées). Il est indifférent d'écrire 
d’abord la ligne 100 et ensuite la ligne 10, ou l'inverse. 


e L'écriture d’une ligne possédant le même numéro qu'une ligne déjà 
existante dans le programme efface l’ancienne. En conséquence, 
pour supprimer une ligne de programme, il suffit d'entrer seulement 
son numéro de ligne. 


e Un programme qui se trouve en mémoire centrale de l'ordinateur 
s'efface lorsque l'alimentation de la machine est coupée. Il est 
cependant possible de conserver le programme (ou les données) 
sur un support mémoire permanent (bande magnétique, disquette) 
d'une unité périphérique (magnétophone, unité de disque) 
connectée à l'ordinateur (ou directement intégrée à celui-ci, dans 
le cas de l’Amstrad). 


e Lorsqu'un programme se trouvant sur un support mémoire per- 
manent est appelé, une copie de ce programme est chargée en 
mémoire centrale de l'ordinateur. La disquette ou la bande magné- 
tique n’est pas effacée pour autant. Si l’on modifie ce programme, 
on modifie donc la copie. Pour que ces modifications soient éga- 
lement conservées sur la version stockée sur le support permanent, 
il est nécessaire de sauvegarder ce programme modifié, c'est-à-dire 
de réaliser l'opération inverse (transfert du programme de la 
mémoire centrale de l'ordinateur vers le support magnétique). 


ÉCRITURE ET MODIFICATION D'UN PROGRAMME : 
L'ÉDITEUR AMSTRAD 


Les ordinateurs Amstrad ne disposent que d’un éditeur de ligne ne 
permettant pas l'accès en tout point de l'écran. Cela signifie qu'il est 
toujours nécessaire de préciser le numéro de la ligne que l’on veut 
modifier et qu'il ne suffit pas, comme pour un éditeur pleine page, 
de positionner le curseur sur la ligne de programme en question. Cet 
éditeur met en jeu les touches suivantes : 


e Retour chariot (Enter). 
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e Déplacement du curseur (quatre touches marquées d’une flèche, 
au-dessus (CPC 464 et CPC 664) ou au-dessous (CPC 6128) du pavé 
numérique). 


e SHIFT et CTRL. 


e CLR (effacer) et DEL (délétion) en haut et à droite du clavier machine 
à écrire. 
e COPY, touche située au centre du pavé consacré aux touches de 


déplacement du curseur (CPC 464 et CPC 664) ou à gauche de 
la barre d’espacement (CPC 6128). 


L'utilisation de l'éditeur va être illustrée en décrivant la procédure 
à suivre pour modifier une ligne de programme existante (celle-ci est 
supposée se trouver déjà en mémoire centrale, c’est-à-dire qu’elle 
a été validée par un retour chariot). Supposons donc que la ligne 
suivante : 


50 PRINT “lllustrtaion de l'éditeur AMSTRAD" 


ait été écrite et que l’on veuille remplacer le mot ‘‘Illustrtaion’” par 
‘‘Ilustration’”. Pour ce faire, le plus simple consiste à utiliser la touche 
COPY, après avoir dédoublé le curseur (obtention d’un curseur de 
copie). Le dédoublement du curseur est obtenu en appuyant simul- 
tanément sur la touche SHIFT et sur l’une quelconque des touches 
de déplacement du curseur. En maintenant la touche SHIFT appuyée, 
le curseur de copie est ensuite déplacé sur l'écran jusqu’à atteindre 
le premier caractère de la ligne à modifier, soit le chiffre 5 dans 
l'exemple choisi. Ce caractère s'affiche alors en vidéo inverse. 


1. Taper la touche COPY pour recopier les premiers caractères de 
la ligne ne devant pas être modifiés. Les caractères recopiés s’af- 
fichent à la position du curseur principal, à mesure que le curseur 
de copie se déplace. Dans notre exemple, nous appuierons sur 
la touche COPY jusqu’à ce que le curseur de copie se place sur 
la deuxième lettre T du mot ‘’Illustrtaion’’. Le début de la ligne 
‘50 PRINT ‘“Illustr’ aura alors été recopié au niveau du curseur 
principal. 


2. Relâcher la touche COPY et entrer les caractères de remplace- 
ment. Ceux-ci s’inscriront au niveau de la position du curseur prin- 
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cipal (ligne en cours de recopie) sans que le curseur de copie soit 
déplacé. Dans notre exemple, nous taperons successivement les 
lettres À et T. 


3. Appuyer deux fois sur la touche flèche droite (déplacement du 
curseur) en maintenant la touche SHIFT enfoncée. Le curseur de 
copie saute alors les lettres erronées T et A pour se placer sur la 
lettre |! du mot ‘“‘Illustrtaion’’. Ce faisant, rien de nouveau ne s'écrit 
sur la ligne en cours de recopie (curseur principal). Les touches 
flèche combinées avec la touche SHIFT permettent en effet de posi- 
tionner le curseur de copie (sans provoquer de recopie lors du 
déplacement). 


4. Appuyer sur la touche COPY pour recopier la fin de la ligne. Une 
fois celle-ci atteinte, taper ENTER pour valider la modification. 
Ainsi, la ligne recopiée remplace l’ancienne en mémoire centrale 
de l'ordinateur. 


Il est également possible de procéder de la manière suivante : après 
avoir dédoublé le curseur, la ligne entière est recopiée au moyen de 
la touche COPY, sans que la copie soit validée, dans un premier temps, 
par la touche ENTER. Les modifications sont alors apportées sur la 
ligne recopiée mais non validée (c'est-à-dire au niveau du curseur 
principal). Pour ce faire, on peut utiliser toutes les touches d'édition 
normale, DEL, CLR, déplacement du curseur (combinée éventuelle- 
ment avec la touche CTRL pour se placer en début ou en fin de ligne). 
Une fois les modifications effectuées, la ligne est validée en tapant 
la touche ENTER. Ce mode d'édition est automatiquement sélectionné 
par l'ordinateur lorsque certaines erreurs sont rencontrées au cours 
de l'exécution d’un programme. La ligne contenant l'erreur est en 
effet automatiquement recopiée et le curseur (non dédoublé) est placé 
au niveau du premier caractère de cette ligne. Les corrections peuvent 
alors être apportées comme si la ligne n'avait pas encore été validée. 
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GLOSSAIRE 


Adresse 


Emplacement d’une zone mémoire quelconque. Chaque octet de la 
mémoire possède ainsi une adresse permettant de le localiser. 


Argument 


Nom donné à la valeur d’un paramètre transmis par un programme 
appelé (ou par une fonction) à un programme appelant. 


ASCII 


Code standard permettant de représenter les caractères par des 
nombres. 

Un fichier ASCII est un fichier texte dans lequel les caractères sont 
représentés par leur code ASCII. 


Bit 
Chiffre binaire O ou 1 (contraction de binary digit). 


Concaténation 


Assemblage de deux chaînes de caractères en une seule. La conca- 
ténation de deux chaînes s'effectue au moyen de l'opérateur +. 


Chaîne 


Séquence de caractères (255 au maximum) que l'ordinateur traite 
comme entité unique ou multiple selon l'instruction utilisée. 


Défaut (valeur par) 


Valeur retenue par l'ordinateur pour un paramètre, lorsque celle-ci 
n’est pas précisée par ailleurs. 


Fichier 
Ensemble d'informations stockées sous un nom donné. 
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Instruction 

Mot (ou ensemble de mots) clé commandant à l’ordinateur de réali- 
ser une opération élémentaire. 

Langage machine 


Ensemble d'instructions directement exécutables par le microproces- 
seur, par opposition aux instructions écrites en BASIC, qui doivent 
être d’abord interprétées. 


Mémoire RAM 


Partie de la mémoire de l'ordinateur permettant un accès en mode 
lecture et écriture. Les informations se trouvant en mémoire RAM 
sont effacées dès que l'ordinateur est mis hors tension. 


Mémoire ROM 


Mémoire dont le contenu ne peut qu'être lu (et non modifié) par le 
programmeur. Les informations stockées en mémoire ROM sont 
permanentes. 


Mot clé 


Mot prédéfini dans un langage de programmation (vocabulaire). 


Octet 


Groupe de huit bits. Chaque bit pouvant valoir O ou 1, un octet peut 
avoir 256 valeurs différentes. 


Opérateur 


Symbole où nom permettant d'effectuer une opération. Il s’agit d’un 
signe (+, —, *, etc.) pour une opération arithmétique, ou d'un mot 
(AND, OR, XOR, etc.) pour une opération logique. 


Programme 


Ensemble d'instructions permettant à l'ordinateur de réaliser une tâche 
définie par le concepteur (du programme). 
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Système d'exploitation 


Logiciel (programme) qui contrôle l'exécution des autres programmes. 


Variable 


Paramètre ayant une valeur modifiable. Chaque variable doit avoir 
un nom. Le nom d’une variable de chaîne doit toujours se terminer 
par le symbole $. Un nom de variable doit toujours commencer par 
une lettre. 
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INSTRUCTIONS, COMMANDES 
ET FONCTIONS BASIC 
DE L'AMSTRAD CPC 464, 
CPC 664 ET CPC 6128 
COMMANDES AMSDOS 







AFTER...GOSUB 


L'instruction AFTER...GOSUB provoque un branchement vers un sous- 
programme après qu’un délai, dont la durée est un paramètre de l’ins- 
truction, se soit écoulé. 


FORMAT 
AFTER n1< ,n2 > GOSUB numéro de ligne 


e nlest un nombre entier spécifiant le délai au bout duquel le bran- 
chement doit s'effectuer. L'unité de temps est définie comme étant 
égale à 0,02 seconde. La valeur 100 correspondra donc à une 
attente de 2 secondes. 


e n2 est un nombre entier (0 à 3) spécifiant le numéro du chrono- 
mètre auquel s'applique l'instruction. L'Amstrad dispose de quatre 
chronomètres indépendants. La valeur par défaut du paramètre n2 
est zéro. 


e Le numéro de ligne est celui de la première ligne du sous- 
programme vers lequel sera effectué le branchement une fois le 
délai écoulé. Ce sous-programme doit se terminer par une 
instruction RETURN. 


COMMENTAIRES 


Un sous-programme peut être associé à chacun des quatre chro- 
nomètres indépendants. L'exécution d’un sous-programme démarre 
lorsque les trois conditions suivantes sont simultanément réalisées : 


e Le délai spécifié dans l'instruction AFTER...GOSUB est écoulé. 


e Il n'y a pas de branchement en attente spécifié par un chronomè- 
tre ayant un ordre de priorité plus élevé. Cet ordre de priorité va 
du chronomètre n° 3 (priorité la plus élevée) vers le chronomètre 
n° 0. 
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e Iln'y a pas d'instruction en cours d'exécution. Dans le cas contraire, 
il faudra attendre la fin de son exécution avant que le sous- 
programme ne soit effectivement lancé. Il faut avoir cette condi- 
tion présente à l'esprit lorsqu'une instruction AFTER...GOSUB est 
utilisée dans un programme faisant appel aux instructions d'entrée 
clavier telles que INPUT ou LINE INPUT. 


Un sous-programme peut être associé à chacun des quatre chro- 
nomètres disponibles. Au retour du sous-programme, l'exécution est 
redirigée vers l'instruction du programme principal qui suit celle où 
s'est produite l'interruption (et non vers l'instruction se trouvant après 
AFTER... GOSUB). 

Les chronomètres sont également utilisés par les instructions 
EVERY...GOSUB. L'’exécution de l’une ou l’autre de ces instructions 
réinitialise le décompte du temps dépendant du chronomètre spécifié. 

La fonction REMAIN annule le branchement déclaré par une ins- 
truction AFTER...GOSUB (ou EVERY...GOSUB). Les instructions DI 
et El permettent respectivement d'interrompre et de reprendre le 
décompte du temps. 


EXEMPLE DE PROGRAMME 


Le programme ci-dessous propose un petit exercice de calcul men- 
tal. Il s'agit de trouver, en un temps limité, le résultat de la multipli- 
cation de deux nombres entiers (compris entre 11 et 26) générés au 
hasard (lignes 40 à 60). Le produit de ces deux nombres est stocké 
dans la variable R (ligne 70). Deux chronomètres sont utilisés, l’un 
(n° 0) étant géré par une instruction EVERY... GOSUB (ligne 110), 
l’autre (chronomètre 1) dépendant d’une instruction AFTER...GOSUB 
(ligne 120). 


10 CLS 
20 T=10 
50 WzO 


40 RANDOMIZE TIME 

0 RISINTCISKkRND(1))+11 

60 RES=INT(1S#RND (1))+11 

70 RERLKRE 

80 PRINT "Tapez une touche,puis entrez 1 

e resultat" 

O0 LOCATE 15,6 

100 FRINT ris"atsrag "tenu 

iio EVERY 80,0 GOSUER 240 — 


2:992 


120 AFTER 550,1 GOSUR 340 

150 IF Wei THEN E00 

140 VESINEEYS 3 IF V#="" GOTQ 150 

150 LOCATE 25,7 

160 INFUT V 

170 IF Wzi THEN FRINT "petit malin ! il 

ne faut pas bloquer le chronometre penda 

nt que l'on reflechit" : GOTO £00 

180 IF VaeR THEN FRINT "RRAVO" ELSE FRINT 
"FAUX 2U3R 

190 DI=REMAIN(I) + DE=REMAIN (0) 

200 LOCATE 1,25 

210 FRINT "Tapez une touche pour continu 

er"s 

BEO AFS=INEEYS 2 IF Aa" THEN ZE0 ELSE 1 

SOUS-FROGRAMME  CHRONOMETRE 

PRE HEREHE HE DE DE DEEE DEEE HE EE MEME DE DEEE HE EE DEEE HE EN 

LOCATE 20,15$5 

INF 1,6 

FRINT "Chronometre "Mi T 

INF 1,25 

Tati 

RETURN 











FRERE RME RE DE DE EEE ER ER BE EEE EME EE EME EEE 
SOUS FROGRANME ECHEC 

RENE DE DEEE DEN DEEE EME EDR HE MEME EE DE RE EME HE NEN 
MAIN CD) 4 Ut 

ATE L,10 

INT Fas assez rapide" 

590 {INT 

oo FRINT Rising ter 

10 RETURN 


Le branchement vers le sous-programme débutant à la ligne 240 
est effectué chaque seconde (voir l'instruction EVERY... GOSUB). Ce 
sous-programme est destiné à afficher le défilement du chronomètre. 
Un effet de flash est associé à ce défilement (lignes 270 et 290). Au 
bout de 0,02 x550=11 secondes, l'exécution est redirigée par l’ins- 
truction AFTER...GOSUB de la ligne 120 vers le sous-programme 
commençant à la ligne 340, dont l’objet est d'afficher le résultat de 
l'opération. Ce branchement ne s'effectue que si le résultat proposé 
par le joueur n’a pas été saisi avant la fin du temps imparti. Dans le 
cas contraire, la fonction REMAIN(1) de la ligne 190 permet d’annu- 
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ler le branchement. La manière dont est saisi le résultat entré au clavier 
(lignes 110 à 140) mérite quelque attention. 

Après que l'instruction AFTER...GOSUB a été exécutée, le pro- 
gramme boucle sur les lignes 130 et 140, dans l’attente d’une entrée 
clavier. Une fois celle-ci effectuée (en tapant n'importe quelle touche), 
le résultat proposé est saisi au moyen d’une instruction INPUT. La 
boucle se révèle ici indispensable ; si les lignes 130 et 140 étaient 
supprimées, il serait impossible d'afficher le temps restant, dans l’at- 
tente de l'entrée du résultat au clavier. Les chronomètres continue- 
raient bien de tourner, mais les branchements ne pourraient s’effec- 
tuer avant la fin de la saisie. 

La variable Winitialisée à la ligne 30 et utilisée aux lignes 130, 170 
et 360 permet de rediriger l'exécution en fonction des sous- 
programmes réellement exécutés. Les chronomètres continuant de 
tourner pendant la saisie (même si le défilement est interrompu à 
l'écran), il est possible de savoir si le résultat a bien été entré dans 
le délai imparti (auquel cas le sous-programme commençant à la 
ligne 340 n'aura pas été exécuté ; la variable W vaudra donc 0 et 
le message de la ligne 170 ne sera pas affiché). 
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ASC 


La fonction ASC donne la valeur numérique du code ASCII du premier 
caractère d’une chaîne spécifiée comme argument. 


FORMAT 

ASC(X$) 
e X$ est une expression alphanumérique (chaîne de caractères). 
Exemples 


ASC(''code’') 
ASC(X$) 


en supposant qu'une valeur ait été préalablement fournie à la variable 
X$. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


Le jeu de caractères utilisé par l’Amstrad se compose de caractères 
alphabétiques, numériques, de signes de ponctuation, d'opérateurs 
arithmétiques et d’un certain nombre de caractères spéciaux (dièse, 
dollar, etc.). Chacun de ces caractères possède un numéro de code 
(qui n’est pas particulier à l’Amstrad) qui est un nombre compris entre 
0 et 127 (code ASCII standard). D'autres caractères plus particuliers 
(les caractères graphiques par exemple), qui n’ont pas nécessairement 
de signification en BASIC, ont un numéro de code compris entre 128 
et 255 (code ASCII étendu). La liste des codes ASCII est donnée en 
annexe du guide de l'utilisateur livré avec l'ordinateur. 

La fonction ASC(X$) a précisément pour objet de retourner le 
numéro de code ASCII du premier caractère de la chaîne donnée 
comme valeur à X$. Si cette chaîne est nulle, un message d'erreur 
‘‘Improper argument in xxx’ (Argument incorrect en xxx) est affiché, 
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xxx correspondant au numéro de la ligne de programme où l'erreur 
a été décelée. 
La fonction CHR$ effectue l'opération inverse de celle qui est réa- 


lisée par la fonction ASC, en renvoyant le caractère correspondant 
à un numéro de code ASCII donné. 
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La commande AUTO génère automatiquement des numéros de lignes 
croissants et d’incrémentation constante lors de chaque activation 
de la touche Entrée (RETURN). 


FORMAT 
AUTO < numéro > <,<incrément > > 


° numéro indique le numéro de la première ligne générée. 


e incrément est la différence entre deux numéros de lignes 
consécutifs. 


La valeur par défaut de ces paramètres est 10. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


La commande AUTO est habituellement utilisée lors de l'écriture 
d'un programme. Elle évite d’avoir à frapper les numéros précédant 
chaque ligne d'instruction. Selon l'option choisie, l’action de la 
commande AUTO est la suivante : 
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spécifié spécifié AUTO 10,20 | Génère des numéros de lignes 


spécifié AUTO 100 


spécifié AUTO ,100 
(précédé 

d’une 

virgule) 


commençant à la ligne 10 et 
espacés de 20 en 20 
(10,30,50,...). 


Génère des numéros de lignes 
commençant à la ligne 10 et 
espacés de 10 en 10 
(10,20,30,...). 


Prend comme incrément par 
défaut la valeur 10 
(100,110,120,...). 


La numérotation commence à 10, 
en utilisant pour incrément la 
valeur de l'argument spécifié 
(10,110,210,...). 





Lorsque la commande AUTO génère un numéro de ligne identi- 
que à celui d’une ligne existant déjà par ailleurs dans le programme, 
le numéro généré est immédiatement suivi d’un astérisque (+). Sur 
le CPC 664, la ligne entière déjà existante est réécrite après le numéro. 
Si l’on ne veut pas effacer l’ancienne ligne, il suffit de taper de nouveau 
la touche Entrée. Le numéro suivant sera généré et l’ancienne ligne 
conservée. Si de nouvelles instructions sont écrites après l’astérisque 
et que la ligne est entrée, l’ancienne ligne sera perdue. 

Pour sortir du mode AUTO et revenir au mode direct, il suffit d’ac- 
tiver la touche Esc. La ligne en cours d'écriture sera perdue. 
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BINS et HEXS 
&X et &H 


Les fonctions BINS$ et HEX$ convertissent un nombre décimal (base 10) 
respectivement en un nombre binaire (base 2) et en un nombre hexa- 
décimal (base 16). Ces fonctions renvoient une valeur de chaîne. Les 
fonctions &X et &H effectuent les conversions inverses et retournent 
respectivement la valeur décimale d’un nombre binaire et 
hexadécimal. 


FORMATS 


BIN$(expression numérique à convertir < format > ) 
HEX$(expression numérique à convertir < format >) 
e L'expression numérique à convertir doit avoir une valeur n 
comprise entre —32768 et 65535. Lorsqu'elle est négative, ces 


fonctions prennent comme argument (65536-n). Les nombres à 
convertir sont automatiquement arrondis à l’entier le plus proche. 


e Le paramètre optionnel format définit le format dans lequel sera 
affiché le résultat de la conversion. Autant de zéros non significa- 
tifs seront ajoutés à la gauche du nombre converti pour respecter 
ce format. Par contre, le paramètre format ne sera pas respecté 
si le nombre de chiffres qu'il stipule est inférieur à ceux qui forment 
la valeur convertie. 

Exemples 

PRINT HEX$(8000,6) 
Le résultat affiché est 001F40. 
PRINT HEX$(8000,2) 


Le résultat affiché est 1F40 (le format n’est donc pas respecté). 
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&X nombre binaire 


&H nombre hexadécimal 
Exemples 
PRINT &H7F 
La valeur 127 est affichée à l'écran. 
PRINT &X1000 


La valeur 8 est affichée. 


COMMENTAIRES 


Les nombres exprimés en formats binaire ou hexadécimal consti- 
tuent le vocabulaire de base de l'ordinateur. Si l’on veut s'adresser 
directement à celui-ci sans passer par l'intermédiaire d’un interprète 
(ce qui est une des fonctions du langage BASIC), il faut utiliser ce voca- 
bulaire. La mémoire centrale de l'ordinateur est constituée d’un 
ensemble de circuits électroniques qui n’ont chacun que deux posi- 
tions possibles (ouvert ou fermé). C’est la raison pour laquelle l’ordi- 
nateur utilise, au niveau fondamental, le système binaire (0 et 1) pour 
représenter un bit, contraction anglo-saxonne de binary digit, nombre 
binaire. Pour des raisons d'efficacité, le microprocesseur groupe les 
bits par huit, chaque groupe constituant un octet (byte). Chaque bit 
ayant deux positions possibles (0 ou 1), un octet peut avoir 28 = 256 
configurations différentes. Certaines données, telles que le code d'un 
caractère, peuvent être stockées sur un seul octet. D'autres nécessi- 
tent deux octets. Chaque octet est identifié par son adresse (de 0 à 
65535) dans la mémoire de l'ordinateur. Un programme, des variables 
et des constantes sont stockés sous la forme d’une suite d’octets. 

La notation hexadécimale utilise les chiffres O à 9 et les lettres A 
à F. La lettre F en hexadécimal correspond au nombre décimal 15. 
Le préfixe &X sert à convertir un nombre hexadécimal en sa valeur 
décimale, le préfixe &H étant utilisé pour les conversions de nombres 
exprimés en notation binaire. Dans ce livre, un nombre exprimé en 
notation hexadécimale est suivi, par convention, de la lettre H (sauf 
lorsqu'il est précédé, comme c'est le cas dans un programme, du 
préfixe &H). 


2 ai= 


Les cinq lignes de programme suivantes permettent d'afficher à 
l'écran la correspondance entre la notation décimale, hexadécimale 


et binaire de 20 nombres consécutifs. 


10 INPUT “Première valeur décimale à convertir”";A 
20 PRINT “Déc”, Hexa”,"‘Binaire” 

30 FOR I=A TO (A+19) 

40 PRINT I,HEX SI), BINS(1} 

50 NEXT | 
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L'instruction BORDER définit la couleur de la bordure de l'écran. 


FORMAT 
BORDER numéro de couleur < ,numéro de couleur > 


e Le numéro de couleur doit être compris entre 0 et 26. 


e Le second numéro est optionnel. Lorsqu'il est fourni, la couleur 
dans laquelle s'affiche la bordure alterne entre les deux couleurs 
spécifiées. 


COMMENTAIRES 


Lorsque le second numéro de couleur est spécifié, la vitesse à 
laquelle se produit le changement de couleur dépend de l'argument 
de l'instruction SPEED INK en cours. 


EXEMPLE DE PROGRAMME 


Ce programme alterne les couleurs dans lesquelles s'affiche la bor- 
dure, en modifiant la vitesse de rotation et en associant un son diffé- 
rent à chaque couleur. 


5 T-100 

10 FOR 1-0 TO 26 

20 IF T > -1000 THEN T-100 ELSE T-T+2 
30 FOR J=1 TO T : NEXT J 

40 BORDER | : SOUND 1,286+ 

50 NEXT | 

60 GOTO 10 


Le programme peut être interrompu à tout moment au moyen de 
la touche Esc. 
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L'instruction CALL appelle un sous-programme écrit en langage 
machine. 


FORMAT 
CALL adresse < (liste de paramètres) > 


e L'adresse est celle du premier octet du sous-programme ou celle 
d'un point d'entrée (appel d’un sous-programme du système 
d'exploitation). 


° Les paramètres éventuellement spécifiés dans la liste doivent être 
séparés par des virgules. 


COMMENTAIRES 


Cette instruction est essentiellement réservée aux utilisateurs déve- 
loppant des programmes écrits en langage machine (langage 
d'assemblage). 

La mémoire ROM de l’Amstrad contient quatre tableaux de points 
d'entrée destinés à maintenir la compatibilité avec les versions futu- 
res de l'ordinateur. Ces tableaux sont formés d’une suite d’instruc- 
tions JUMP qui établissent les branchements vers les sous-programmes 
du système d'exploitation. Le contenu des tableaux est copié en 
mémoire RAM lors de l’initialisation du système. Alors que l'adresse 
même des sous-programmes en mémoire ROM pourra changer dans 
des versions futures, celle des points d'entrée ne sera pas modifiée 
(d'où l'intérêt de les utiliser si l’on veut accéder à ces sous- 
programmes). Le bloc JUMP principal se situe entre les adresses 
BBOOH et BD37H. 
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CAT 


La commande CAT permet d'établir le répertoire d'une cassette ou 
celui d’une disquette. 


FORMAT 


CAT 


COMMENTAIRES 


Le répertoire est la liste des fichiers se trouvant sur un support 
mémoire donné. Dans le cas d’une cassette, le répertoire est établi 
de manière séquentielle. Lorsqu'un fichier est trouvé, les indications 
suivantes sont affichées à l'écran : 


nom du fichier — numéro du bloc — type du fichier 


Le type du fichier est un caractère identifiant la manière dont le 
fichier a été sauvegardé : 


$ Programme BASIC non protégé. 

Vo Programme BASIC protégé. 

* Fichier ASCII (fichier texte dans lequel les caractères sont 
représentés par leur numéro de code ASCII). 

& Fichier binaire. 


Le répertoire d’une disquette est affiché par ordre alphabétique (sur 
deux colonnes). Le nom de chaque fichier est suivi de sa taille (en 
kilo-octets, nombre arrondi à la valeur supérieure). La liste des noms 
de fichiers est précédée du numéro de l'unité de disque (A:, B:, etc.) 
et d’une identification donnée par l'utilisateur. Le nombre de kilo- 
octets restant disponibles sur la disquette est affiché à la suite de la liste. 


A6 


CHAIN et CHAIN MERGE 


Les instructions CHAIN et CHAIN MERGE chargent un programme 
se trouvant sur disque où sur cassette. Le nouveau programme rem- 
placera celui se trouvant préalablement en mémoire centrale (CHAIN) 
ou sera fusionné avec celui-ci (CHAIN MERGE). 


FORMATS 


CHAIN nom de fichier < ,numéro de ligne > 


CHAIN MERGE nom de fichier < ,numéro de ligne > < ,DELETE 
numéro de ligne — numéro de ligne > 


e Le nom de fichier est optionnel dans le cas d’une utilisation sur 
cassette. S'il n’est pas précisé, le premier fichier trouvé sera 
sélectionné. 


e Le premier numéro de ligne (le seul dans le cas de CHAIN) 
correspond à la ligne à partir de laquelle commencera automa- 
tiquement l'exécution, une fois le nouveau programme chargé. 
Lorsque ce paramètre n’est pas spécifié, l'exécution commence 
à partir de la ligne ayant le plus petit numéro. 


e L'option DELETE de l'instruction CHAIN MERGE permet de sup- 
primer les lignes de l’ancien programme se trouvant entre les 
numéros spécifiés. 


COMMENTAIRES 


Les instructions CHAIN et CHAIN MERGE provoquent l'exécution 
immédiate du nouveau programme chargé. Lorsque le programme 
appelé par CHAIN MERGE possède certaines lignes portant le même 
numéro que des lignes du programme se trouvant déjà en mémoire 
centrale, celles de l’ancien programme sont effacées au profit de celles 
du nouveau. Les valeurs de variables ne sont pas effacées par l’ins- 
truction CHAIN MERGE. Par contre, les informations contenues dans 
les instructions DEF FN, DEFINT, DEFREAL et DEFSTR sont perdues. 
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Ces instructions doivent donc être réexécutées une fois la fusion réa- 
lisée. Il en va de même pour les boucles (FOR...NEXT, 
WHILE...WEND) et les branchements (GOSUB, ON ERROR GOTO), 
les pointeurs devant être repositionnés. Les fichiers doivent également 
être réouverts. 

Les programmes protégés (c'est-à-dire ceux qui ont été sauvegardés 
en utilisant l'option ,P de l'instruction SAVE) ne peuvent pas être 
fusionnés au moyen de l'instruction CHAIN ou CHAIN MERGE. 


LATE 


La fonction CHR$ renvoie le caractère correspondant au code ASCII 
donné comme argument à la fonction. 


FORMAT 
CHR$(n) 


° nest une expression numérique entière dont la valeur est comprise 
entre O et 255. 


COMMENTAIRES 


Seuls les caractères dont le code ASCII est compris entre 32 et 255 
peuvent être affichés à l'écran par l'intermédiaire de la fonction CHR$. 
Les caractères ayant un numéro de code inférieur à 32 correspondent 
à des fonctions BASIC particulières. Malgré tout, ces codes peuvent 
être donnés comme arguments à la fonction CHR$ qui les imprime, 
dans un programme, comme des caractères. Par exemple, l’exécu- 
tion de PRINT CHR$(7) provoque l'émission d’un son. 

Il'est à noter que la plupart des imprimantes ne disposent pas du 
jeu complet de caractères correspondant à l’ensemble des codes 
compris entre 32 et 255. Les caractères graphiques, par exemple, ne 
peuvent souvent être affichés qu’à l'écran. 

La fonction ASC effectue l'opération inverse de celle qui est réalisée 
par CHR$, en renvoyant le code ASCII d’un caractère qui lui est donné 
comme argument. 

La liste de tous les codes ASCII est donnée en annexe du manuel 
de l'utilisateur livré avec l’ Amstrad. 
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Cette commande réinitialise toutes les variables numériques à zéro 
et toutes les variables de chaîne à une longueur nulle. 


FORMAT 


CLEAR 


COMMENTAIRES 


L'instruction CLEAR efface les valeurs des variables mais pas le pro- 
gramme en cours. L'exécution de cette commande rend les tableaux 
non définis et clôt les fichiers. De même, toutes les informations 
contenues dans les instructions DEF FN, DEFINT, DEFREAL et DEFSTR 
sont perdues. Le mode radian est d'autre part rétabli pour toutes les 
fonctions trigonométriques. 

La commande CLEAR étant assez destructrice, il est recommandé 
de ne l'utiliser qu'avec précaution et de se souvenir que l'instruc- 
tion ERASE permet de n’effacer que les tableaux, sans affecter les autres 
données du programme (voir la description de cette instruction). 
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CLEAR INPUT Instruction 
(CPC 664 et CPC 6128) 


L'instruction CLEAR INPUT efface le contenu de la mémoire tampon 
du clavier. 


FORMAT 


CLEAR INPUT 


COMMENTAIRES 
Cette instruction peut être en particulier utilisée lorsque plusieurs 


groupes de données doivent être saisis successivement au clavier au 
moyen des instructions INKEY$ et INKEY. 
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RE 


L'instruction CLG efface l'écran graphique et sélectionne éventuel- 
lement une nouvelle couleur de fond pour le mode graphique. 


FORMAT 
CLG < numéro de couleur > 


° Le numéro de couleur doit être compris entre 0 et 15. 


COMMENTAIRES 


Lorsque le numéro de couleur n’est pas précisé, la valeur courante 
de l’encre de fond est conservée (voir l'instruction GRAPHICS PAPER). 
Cette couleur est aussi celle sur laquelle s'inscrivent les caractères 
écrits en mode graphique (voir l'instruction TAG). 


= 5-2 


EU 


Les instructions CLOSEIN et CLOSEOUT sont destinées à fermer tous 
les fichiers ouverts en lecture (CLOSEIN) ou en écriture (CLOSEOUT). 
Avant la fermeture, les données relatives aux fichiers ouverts en écri- 
ture sont transférées des mémoires tampon correspondantes. Ces 
emplacements mémoire sont alors libérés. 


FORMAT 


CLOSEIN 
CLOSEOUT 


COMMENTAIRES 


Un fichier doit nécessairement être fermé lorsque le transfert des 
données est terminé. Les instructions CLOSEIN et CLOSEOUT vident 
en effet les mémoires tampon associées aux fichiers et l'instruction 
CLOSEIN place un caractère de fin de fichier (CTRL Z) à la fin des 
fichiers séquentiels ouverts en mode écriture (voir l'instruction 
OPENIN). 

Il est à noter que l'instruction END ferme automatiquement tous 
les fichiers ouverts. 

Les instructions CLOSEIN et CLOSEOUT sont illustrées dans le pro- 
gramme de gestion de fichier d'adresses donné dans la rubrique 
OPENIN et OPENOUT. 


HA 


CLS 


L'instruction CLS permet d'effacer l'écran ou la fenêtre d'écran 
précisée. 
FORMAT 


CLS < #numéro de canal > 


COMMENTAIRES 


L'instruction CLS efface la totalité de l’écran ou la fenêtre texte 
précisée ; elle l’initialise dans la couleur en cours du papier (voir l'ins- 
truction PAPER). Si l'instruction CLS n'est suivie d'aucun paramètre 
ou si le numéro de canal est zéro, le curseur est placé en haut et 
à gauche de l'écran. 
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COMMANDES AMSDOS 
CPC 664 et CPC 6128 


AMSDOS est le système d'exploitation du disque (SED ou DOS en 
anglais) résidant en mémoire morte. Il existe une alternative à l’utili- 
sation de AMSDOS, celle consistant à utiliser le système non résident 
CP/M, beaucoup plus performant mais indépendant du BASIC (voir 
l’Introduction). Une seule commande de CP/M sera évoquée ici, la 
commande FORMAT. Toute opération d'écriture sur disque (sauve- 
garde d’un programme par exemple) nécessite en effet que le disque 
en question ait été au préalable formaté. Cette opération n'est possi- 
ble que sous CP/M, le système AMSDOS ne disposant pas de la 
commande équivalente. 

AMSDOS possède deux types de commandes, les commandes 
externes et les commandes internes. Les commandes internes ne se 
différencient pas des commandes ou instructions BASIC. Elles sont 
donc traitées à ce titre dans le reste de l'ouvrage. Lorsque l’on utilise 
par exemple l'instruction PRINT #1, on utilise une instruction BASIC. 
Par contre, PRINT #9 est une commande AMSDOS. Cette distinction 
est naturellement accessoire pour l'utilisateur. 

Par contre, les commandes externes de AMSDOS nécessitent la mise 
en œuvre d’une procédure d'appel légèrement différente. Elles sont 
accessibles à partir de BASIC en tapant le signe @, ce que l’on obtient 
en pressant simultanément la touche SHIFT et la touche portant les 
deux symboles \ et @. 

Avant de passer en revue la liste des commandes externes de 
AMSDOS, il est nécessaire de revenir sur la notion de nom de fichier 
(fichier programme, fichier de données, etc.). D'une manière géné- 
rale, un nom de fichier, sous AMSDOS, est formé de trois parties : 


e Le nom d'unité, A: ou B:. Cela ne concerne que les utilisateurs 
disposant de deux unités de disques. Chaque unité est alors iden- 
tifiée par une lettre (suivie de :) par le système d'exploitation. L'unité 
intégrée au clavier est l’unité A:, qui est aussi, sauf spécification 
contraire, l'unité par défaut. Lorsque l’on effectue une opération 
mettant en jeu l’unité par défaut, le nom d'unité n’a pas besoin 
d'être mentionné. 
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e La partie principale du nom de fichier. C’est cette partie qui est 
communément appelée ‘’nom de fichier” dans le reste de l’ou- 
vrage. La partie principale peut comporter de 1 à 8 caractères, sans 
espace blanc intermédiaire. 


L'extension de nom du fichier, formée d’un point suivi de 1 à 3 
caractères (sans espace blanc intermédiaire). L'extension est facul- 
tative. Lorsqu'elle n’est pas spécifiée par l'utilisateur au moment 
d’une sauvegarde, le système d’exploitation AMSDOS ajoute lui- 
même une extension de nom adaptée. AMSDOS se sert en parti- 
culier de ces extensions pour établir une préséance dans la 
recherche des noms de fichiers. 


L'extension de nom mise automatiquement par le système au 
moment de la sauvegarde est une extension par défaut. Si l’on utilise 
par exemple l'instruction : 


SAVE ‘’BLANCHE" 


pour sauvegarder le fichier programme susnommé, AMSDOS trans- 
formera automatiquement le nom BLANCHE en BLANCHE.BAS. II 
est par contre tout à fait loisible à l’utilisateur de sauvegarder le fichier 
en lui donnant une extension différente, .T par exemple, au moyen 
de l'instruction : 


SAVE “’BLANCHE.T" 


Les extensions de noms utilisées par défaut par AMSDOS sont les 
suivantes : 


Absence de spécification autre que le point. C’est par 
exemple le cas pour un fichier de données créé au moyen 
d'une instruction : 


OPENOUT ‘’MONFRIC" 


.BAS Programme BASIC sauvegardé par une instruction : 
SAVE ‘’MONFRIC””’ ou SAVE ‘’MONFRIC"',P ou 
SAVE ‘’MONFRIC'’,A. 


.BIN Fichier binaire sauvegardé au moyen d’une instruction : 
SAVE ‘’MONFRIC’’,B,paramètres binaires. 
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.BAK Fichier de sauvegarde. Ce fichier est automatiquement 
constitué par AMSDOS lorsque l’on sauvegarde un fichier 
plusieurs fois sous un même nom (lorsqu'on lui a par 
exemple apporté certaines modifications). Si l’on sauve- 
garde le fichier modifié ‘’Gencébas”, l’ancienne version 
sera conservée sur la disquette sous le nom : 


“’Gencébas.BAK" 


UTILISATION DE CARACTÈRES GÉNÉRIQUES 


Ces caractères sont essentiellement utilisés pour établir un réper- 
toire partiel de la disquette ou pour effacer ou copier une classe par- 
ticulière de fichiers. 1l existe deux caractères génériques, * et ?. 


* Remplace un groupe de caractères. Par exemple, *.BAS 
désigne tous les fichiers ayant l’extension .BAS, quelle que 
soit la partie principale du nom de ces fichiers. De la même 
manière, FIC+.BAS désigne tous les fichiers ayant l'extension 
.BAS et dont la partie principale du nom commence par les 
trois lettres F, | et C. 


? Remplace un caractère particulier. En reprenant l'exemple 
précédent, FIC2.BAS désignera aussi bien le fichier FIC7.BAS 
que FIC8.BAS, mais pas le fichier FIC10.BAS (qui sera par 
contre reconnu par FIC*.BAS). 


COMMANDES EXTERNES DE AMSDOS 


À, :B et : DRIVE 


À sélectionne l'unité À comme unité par défaut, : B opérant de la 
même manière avec l'unité B. 


1 DRIVE, ‘A’ est équivalent à : A et : DRIVE, ‘’B’’ est équivalent à ; B. 


| CPM 


Provoque le passage sous CP/M. Cette commande ne doit être utili- 
sée qu'après sauvegarde d’un éventuel fichier se trouvant en mémoire 
centrale. Dans le cas contraire, ce fichier serait perdu. 
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| DIR < ,chaîne de caractères > 


Établit le répertoire de la disquette. La chaîne de caractères (option- 
nelle) sert à établir un répertoire partiel de la disquette, en utilisant 
les caractères génériques, comme dans l'exemple : 


1 DIR,“FIC.«" 


Lorsque aucune chaîne n’est spécifiée, le répertoire complet est affiché 
et la commande ; DIR s'apparente alors à la commande interne CAT. 


DISC, : DISC.IN et : DISC.OUT 


Définit l’unité de disque comme unité standard d'entrée (: DISC.IN) 
ou comme unité standard de sortie (; DISC.OUT) ou comme unité 
standard d'entrée et de sortie (1 DISC). 

Ces commandes n’ont d'intérêt que lorsqu'une unité de disque et 
un magnétocassette sont utilisés simultanément. 


ERA chaîne de caractères 


Efface de la disquette les fichiers non protégés dont le nom (complet) 
est spécifié par la chaîne de caractères. Les caractères génériques 
peuvent être employés dans cette chaîne. Par exemple : 


| ERA, ‘*.BAK" 


efface tous les fichiers de sauvegarde. 

La commande ;ERA,'"*.*” ne peut s’utiliser que dans trois 
circonstances : 

e vous disposez d’une où plusieurs copies de votre disquette ; 

e vous êtes atteint de masochisme pervers ; 

e vous n'avez pas tout à fait compris la signification du caractère *. 


 REN,nouveau-nom,ancien-nom 


Permet de modifier le nom d’un fichier stocké sur disquette. Les carac- 
tères génériques ne sont pas autorisés dans cette commande. 


Sie 


:TAPE , : TAPE.N et : TAPE.OUT 


Définit le magnétocassette comme unité standard d'entrée (1 TAPE.IN) 
ou comme unité standard de sortie (: TAPE.OUT), où encore comme 
unité standard d'entrée et de sortie (1 TAPE). 
Ces commandes n’ont d'intérêt que lorsqu'un magnétocassette et une 
unité de disque sont utilisés simultanément. 


: USER,expression numérique entière 


Permet d'effectuer une partition de la disquette. L'expression numé- 
rique doit être comprise entre O et 15. Les commandes d'accès disque 
telles que CAT, LOAD, SAVE, DIR, etc. s'appliquent toujours à la par- 
tition définie par la commande : USER en cours. 


LA COMMANDE FORMAT de CP/M 


Le formatage est une opération qui doit être effectuée sur toute dis- 
quette vierge, avant que celle-ci ne puisse être utilisée pour sauve- 
garder un programme ou des données. Par contre, il ne faut jamais 
reformater une disquette contenant des informations déjà enregis- 
trées et que l’on souhaite conserver. Le formatage a en effet pour 
conséquence d'effacer toute information se trouvant déjà sur la 
disquette. 

La procédure à suivre pour formater une disquette est la suivante 
(système monodisque) : 


e Taper : CPM (passage sous le système CP/M). 

e Placer la disquette système CP/M dans le lecteur. 

e Taper FORMAT. Après chargement de l'utilitaire de formatage, 
l'écran affiche : 


“Please insert disc to be formatted into drive A then press any key” 


e Placer le disque à formater dans le lecteur puis taper une touche 
quelconque. Une fois l'opération terminée, un message demande 
si une autre disquette doit être formatée. Pour répondre négative- 
ment, taper N. 
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° Placer, en réponse au nouveau message affiché, la disquette système 
CP/M dans le lecteur, puis taper une touche quelconque. 


e Retourner sous BASIC en tapant AMSDOS. 
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La commande CONT reprend l'exécution du programme après une 
interruption. 


FORMAT 


CONT 


COMMENTAIRES 


Cette commande est généralement utilisée en conjonction avec l’ins- 
truction STOP écrite dans un programme. Cette dernière suspend en 
un point précis l'exécution du programme, permettant par exemple 
à l'utilisateur d'examiner et/ou de modifier en mode direct la valeur 
de certaines variables. L’exécution du programme peut alors être 
reprise, à partir de l'endroit même où s’est produite l'interruption, 
au moyen de la commande CONT. Si l’on souhaite reprendre l'exé- 
cution en un autre point du programme, il convient d'utiliser l’ins- 
truction GOTO en mode direct et non la commande CONT. De 
même, CONT ne peut pas être utilisée lorsque le programme (et non 
la valeur des variables) a été modifié au cours de l'interruption. 

La commande CONT est également utilisable pour reprendre l’exé- 
cution d’un programme qui a été interrompu après : 


e l'apparition d’une erreur ; 


e l'exécution, par le programme, d’une instruction END ; 


e la frappe deux fois de suite de la touche ESC. Cela a pour effet 
de suspendre l'exécution du programme, le message ‘Break in xxx” 
(interruption en xxx) étant alors affiché. xxx est le numéro de ligne 
de l'instruction en cours d'exécution au moment de l'interruption. 
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Fonction COPYCHRS 
(CPC 664 et CPC 6128) 


La fonction COPYCHRS assigne, à la variable alphanumérique à 
laquelle elle est associée, le caractère, dans le canal indiqué, placé 
à la position courante du curseur. 


FORMAT. 


COPYCHR$S(# numéro de canal) 


COMMENTAIRES 


Cette fonction permet d'attribuer à une variable alphanumérique 
un caractère placé à n'importe quel endroit de l'écran. 

Le programme donné en illustration de l'instruction KEY utilise la 
fonction COPYCHRS pour lire les caractères écrits dans la matrice 
du générateur. 
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CURSOR Instruction 
(CPC 664 et CPC 6128) 


L'instruction CURSOR permet d'afficher le curseur sur l'écran lors 
de l'exécution des commandes d'entrée clavier (INKEYS et INPUT). 


FORMAT 
CURSOR < paramètre système > <, paramètre utilisateur > 


e Les paramètres ont pour valeur 0 ou 1 ; ils correspondent respec- 
tivement à ‘’affiché’’ et ‘’non affiché’”’. 


Exemples 
CURSOR 0,0 et  CURSOR 1,0 


Le curseur n’est pas affiché sur l'écran lors de l'exécution des 
commandes INKEY$ ou INPUT. 


CURSOR 0,1 


Le curseur est affiché sur l’écran seulement lors de l'exécution de 
la commande INPUT. 


CURSOR 1,1 


Le curseur est affiché sur l’écran lors de l'exécution des commandes 
INKEY$ ou INPUT. 


COMMENTAIRES 


Les deux paramètres ne sont pas nécessaires : il suffit d'en indiquer 
un. Dans ce cas, l’autre conserve la valeur qu’il avait précédemment. 

A l'initialisation du système, les valeurs par défaut sont O0 et 1 
(CURSOR 0,1). 
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EXEMPLE DE PROGRAMME 


Le programme ci-dessous illustre l’état du curseur en fonction des 
paramètres associés à l'instruction CURSOR. 


INREN 


5 WE 


LIECUT 
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La fonction DEC$ convertit une valeur numérique en une valeur alpha- 
numérique, suivant un format donné. 


FORMAT 
DEC$(expression numérique,spécification du format) 


e Sur le CPC 464, une erreur dans l'interpréteur BASIC nécessite 
d'employer une syntaxe légèrement différente, en mettant deux 
parenthèses ouvrantes après le mot clé DEC$ et une seule paren- 
thèse fermante après l’argument spécification du format. 


e Les caractères destinés à établir le format sont les suivants : 


# Caractérise un champ numérique à un chiffre. 
Spécifie un point décimal. 


; Place une virgule entre les groupes de trois chiffres situés 
à gauche du point décimal. 


+ Génère un signe plus (+) pour les nombres positifs ou un 
signe moins (—) pour les nombres négatifs. 


- Placé à la fin du format, génère un signe moins (—) après 
les nombres négatifs. 


** Place un astérisque au début du nombre et, si celui-ci est 
précédé d'espaces, les remplace par des astérisques. 

££ Place le caractère livre (£) au début du nombre. 

$$ Place le caractère dollar ($) au début du nombre. 


xx f Place le caractère livre (£) au début du nombre et, si celui- 
ci est précédé d'espaces, les remplace par des astérisques. 


+*x$ Place le caractère dollar ($) au début du nombre et, si celui- 
ci est précédé d'espaces, les remplace par des astérisques. 
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AnAA 


Précédé de caractères dièses (#), spécifie une notation 
exponentielle. 


COMMENTAIRES 


Cette instruction a une mise en œuvre analogue à celle de la fonc- 
tion PRINT USING ; le résultat, au lieu d’être affiché sur l'écran, est 
assigné à une variable alphanumérique. 


EXEMPLE DE PROGRAMME 


Le programme ci-dessous illustre l’utilisation de l'instruction DECS ; 
différents formats sont établis et, lors de l'affichage des résultats, le 
nombre est précédé de la structure de son format. 














ni 


N 


Fées 2 LH NOIRE. GEL LCI CNNGAES nt 


L FORMAT a TRE CE 0 RE EU. FE T 


QUE CNE CHERE 0) 
MH SE EE 4 nits Téalt Cat 4 






CIN CORRE RER HER 0 0 


He ss TAB) AE 
HAREHEAERE se HER) 

PORTE on PER s' TARCEE)AE 

BE CN e PO HERIEME HERE) 


FO de PEAR AE CH ss VAR CS) A4 


GE CN CORAN, HE") 
DORMI AH ss TAB C2) AE 


DA CN, POSER, HER) 
REA M 2" TAB C2D) A 
CN CORRE, ARR) 

OR ARERRMER HAE 2 TARDE) At 
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AH=DECE CN, POESIE, AH) 
PRINT OR, HA 23 TAB CZD) AE 
PRINT 

AF=DECE CN, HARAS, HE) 

PRINT CHA, HR 2"; TAB (22) A4 





PRINT 

AESDECE CN 4 PHARE, ARR) 

PRINT COAHHHHHAHER, OH 1": TAB(22) AY 
PRINT 

AE=DECE CN, MAR HA) 

PRINT PS RAA 1": TAB(22) A€ 





390 FRINT 

400 AFSDECE CN, Me RAA) 
410 PRINT 4e HART 
420 GOTO 420 


fs TAB(22) A 


Dans l’exemple de résultats donné ci-dessous, la valeur entrée est 
le nombre 32.1. 


FORMAT RESULTAT 
HHHHHHH : 32e 
HAN .HHH : 32.106 
HHHHHHH, . HHH 5 32.106 
2RHHHHHHH , -_HHH : PERMET L . 10 
EEHHHHHHEH, -_HHH : £32.168 
SSH, -_ HHH 8 +32.1060 
MCHHHNHHEH , - HHH : 26H E TE . 100 
ESHHHNIHH, - HHH 3 PRIMES 32 . 100 
HHHHHHR, -HHH s +32.106 
HHHHHHH , - HHH— Ê 32.100 
H-HHHHHTTTT 5 . S21HHE+R82 
H-OHHHHRHTTTTE : 3.21006E +01+ 
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Instruction (DEF FN) DEF FN et FN 
et fonction (FN) 


L'instruction DEF FN déclare une fonction définie par l'utilisateur et 
FN permet de calculer la valeur de cette fonction pour la liste de para- 
mètres spécifiés. 


FORMATS 


DEF FN nom de fonction < (liste de variables) > = expression 


FN nom de fonction < (liste de paramètres) > 


e Le nom de fonction peut être un nom de variable numérique ou 
une chaîne de caractères. Ce nom sert à identifier la fonction. 


e La liste de variables est une suite de variables numériques ou de 
variables de chaîne, séparées par des virgules. Ces noms sont fic- 
tifs ; ils peuvent être remplacés par d’autres noms lors de l’appel 
de la fonction au moyen de FN. 


e L'expression est la relation de définition de la fonction. Il doit y 
avoir correspondance entre le type de l'expression (numérique ou 
fonction de chaîne) et le nom déclaré pour la fonction. 


e La liste des paramètres est une suite de valeurs qui sont passées 
aux Variables, dans l’ordre où elles sont écrites dans l'instruction 
de déclaration de la fonction. L'expression sera calculée en utili- 
sant ces valeurs. Il doit y avoir correspondance entre le type du 
paramètre et celui de la variable qui le reçoit. 


COMMENTAIRES 


L'instruction DEF FN ne peut être utilisée qu’en mode programme. 
Elle doit toujours être exécutée avant que la fonction ainsi définie 
ne puisse être appelée au moyen de FN. 

La liste de variables peut comporter des noms de variables utilisés 
pour d’autres fonctions du programme. Les valeurs de celles-ci ne 
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seront pas affectées par les paramètres de FN passés aux variables 
de DEF FN. Réciproquement, il n’est pas nécessaire de spécifier le 
nom d’une variable comme argument de DEF FN si la valeur courante 
de cette variable doit être utilisée par la fonction définie. Le second 
exemple donné ci-dessous illustre cette possibilité. 


EXEMPLES 
1. Définition d’une fonction SURF calculant la surface d’un cercle : 
10 DEF FNSURFIR) = PI*R+R 
20 INPUT ‘’Rayon'';X 
30 PRINT ‘Surface du cercle ="";FNSURF(X) 
2. Calcul de la racine cubique d’un nombre : 
10 DEF FNRacine = EXP(1/3*LO0G{(X)) 


20 INPUT ‘Nombre dont la racine cubique doit être calculée'';X 
30 PRINT ‘Racine cubique de ce nombre'";FNRacine 
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ES 


Les instructions DEFINT, DEFREAL et DEFSTR déclarent les variables 
spécifiées dans le type entier (DEFINT), réel (DEFREAL) ou chaîne de 
caractères (DEFSTR). 

FORMAT 


DEFtype < — lettre > < lettre > < lettre > 


e type est l’un des suffixes INT, REAL ou STR. 


e lettre est une lettre de l'alphabet. 
Exemples 
DEFINT R-V 


déclare que toutes les variables dont le nom commence par la lettre 
R, S, T, U ou V sont de type entier. 


DEFSTR À 


déclare que toutes les variables dont le nom commence par la lettre 
A sont de type chaîne de caractères. 


DEFREAL C-E,K-M 


déclare que toutes les variables dont le nom commence par les lettres 
C, D, E, K, Let M sont de type numérique réel. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


L'instruction DEFtype doit être exécutée avant que la variable ainsi 
déclarée ne soit utilisée dans le programme. Il est donc préférable 
de placer ces instructions dans les premières lignes du programme. 
Toutes les variables numériques non déclarées sont considérées 
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comme étant des variables numériques réelles. Il est également pos- 
sible de déclarer le type d’une variable en faisant suivre son nom d’un 
des symboles % et ! (ou $ pour une variable de chaîne). Ces symboles 
de déclaration ont toujours la priorité sur une instruction DEFtype, 
c'est-à-dire qu'une variable À initialement déclarée comme nombre 
entier par l'instruction DEFINT A pourra être redéfinie, à un autre 
endroit du programme, comme étant une variable dont la valeur est 
exprimée par un nombre réel (en écrivant par exemple A!=A). 

Les nombres entiers sont codés sur deux octets. Leur valeur doit 
être comprise entre —32768 et 32767. Les nombres réels peuvent 
prendre toute valeur comprise entre 2.9E — 39 et 1.7E+ 38. Ces valeurs 
sont codées sur cinq octets (voir la fonction @). 
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DEG et RAD 


L'instruction DEG positionne le mode degré comme unité de calcul 
des fonctions trigonométriques (ATN, COS, SIN, TAN). L'instruction 
RAD positionne le mode radian comme unité de calcul pour les 
mêmes fonctions. 


FORMATS 


DEG 
RAD 


COMMENTAIRES 


Le mode radian est établi par défaut lors de la mise sous tension 
de l'ordinateur. Lorsque le mode degré est sélectionné au moyen de 
l'instruction DEG, ce mode est conservé jusqu’à ce que le système 
soit réinitialisé ou qu’une commande NEW, CLEAR, LOAD, RUN, 
etc. (ou une instruction RAD) soit exécutée. 
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La commande DELETE supprime certaines lignes de programme pré- 
sentes en mémoire centrale de l'ordinateur. 


FORMAT 
DELETE < ligne 1> < -ligne 2> 


e ligne 1 est le numéro de la première ligne à supprimer. 


e ligne 2 est le numéro de la dernière ligne à supprimer. 


COMMENTAIRES 
Après exécution de la commande DELETE, l'ordinateur revient en 
mode direct. Il en résulte que si une seule ligne doit être effacée, il 
est plus simple de taper, en mode programme, le numéro 
correspondant. 
DELETE ligne 
n'efface que la ligne dont le numéro est spécifié. 


DELETE ligne 1 - ligne 2 


efface toutes les lignes dont les numéros sont compris entre ceux spé- 
cifiés dans la commande. Par exemple : 


DELETE 20-60 


supprime toutes les lignes de programme comprises entre les numéros 
20 et 60 (inclus). 


DELETE - ligne 2 
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efface toutes les lignes comprises entre la première ligne de pro- 
gramme et celle dont le numéro est spécifié. Par exemple : 


DELETE -200 


efface toutes les lignes de programme dont le numéro est compris 
entre 0 et 200 (ligne 200 comprise). 


DELETE 


(sans numéro de ligne) : efface la totalité du programme se trouvant 
en mémoire centrale. 


Er 


DERR Fonction 
(CPC 664 et CPC 6128) 


La fonction DERR retourne un code d'erreur dans le cas où une erreur 
s'est produite au cours d’un accès disque. 


FORMAT 


DERR 


COMMENTAIRES 


Comme tous les autres codes d'erreur, ceux qui sont liés aux accès 
disque portent un numéro retourné par la fonction ERR (voir la rubri- 
que ‘‘Gestion des erreurs’’). Il s’agit en l'occurrence des numéros 31 
et 32. Lorsqu'une telle erreur se produit, la fonction DERR permet 
de rechercher plus précisément l’origine de l'erreur. Elle lit un indi- 
cateur codé sur un octet. Le bit de poids fort (bit 7) de cet octet est 
positionné si l'erreur a été décelée par le système d'exploitation 
AMSDOS. Il vaut au contraire O si l’erreur a été indiquée par le 
contrôleur du disque. Dans ce dernier cas, le bit 6 de l'indicateur 
est positionné. En conséquence, la fonction DERR retournera un 
numéro de code supérieur à 128 dans le cas d’une erreur AMSDOS 
et un numéro compris entre 64 et 128 dans le cas d’une erreur détec- 
tée par le contrôleur. 

Par exemple, la valeur 148 correspond à une tentative d'écriture 
sur un disque plein. Il s’agit d’une erreur décelée par le système d’ex- 
ploitation. La valeur 72 est retournée par la fonction DERR lorsqu'un 
accès disque est demandé alors qu'il n’y a pas de disquette dans l’unité 
spécifiée. Cette erreur est détectée par le contrôleur. La liste complète 
des codes d'erreur au cours d’un accès disque est donnée dans le 
guide de l'utilisateur livré avec l’ Amstrad. 
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Les instructions DI et El sont destinées respectivement à interdire et 
à autoriser les interruptions d’une partie de programme ou de sous- 
programme. 


FORMATS 


DI 
El 


COMMENTAIRES 


Les ordinateurs Amstrad possèdent une horloge qui permet d'utiliser 
simultanément quatre chronomètres. En fonction du laps de temps 
écoulé, des sous-programmes peuvent être exécutés. Si l'exécution 
de certaines parties de programme ne doit pas être interrompue, on 
utilise les instructions DI (Disable Interrupt, annulation d’une inter- 
ruption) et El (Enable Interrupt, rétablissement d'une interruption) pour 
délimiter ces zones (voir l'instruction EVERY...GOSUB). 

L'instruction DI marque le début de la zone ; celle-ci se termine 
après une instruction El ou après une instruction RETURN dans le 
cas d’un sous-programme d'interruption associé à une instruction 
EVERY...GOSUB ou AFTER..GOSUB. Lorsqu'une interruption est 
annulée, l’appel du sous-programme est seulement retardé (et non 
pas supprimé). Le branchement s'effectuera dès que l'instruction DI 
aura été désactivée (et que les autres conditions de branchement 
seront réalisées). 

Les interruptions de programme générées par des erreurs ou par 
la frappe de la touche Esc ne sont pas affectées par l'instruction DI. 
Les interruptions évoquées ici sont naturellement les interruptions 
logicielles. Les interruptions du système (qui se produisent au moins 
toutes les 20 millisecondes) ne sont en rien affectées par les instructions 
DI et El. 
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L'instruction DIM permet de spécifier les dimensions maximales de 
tableaux de variables et réserve la place mémoire en conséquence. 


FORMAT. 
DIM variable(indices) < ,variable(indices) > … 
e_ variable est le nom désignant le tableau ; chacune de ces variables 


aura pour nom celui du tableau suivi, entre parenthèses, de l'indice 
particulier à cette variable. 


e indices est une liste d'expressions numériques, séparées par une 
virgule, qui définissent les dimensions du tableau. 


Exemples 
DIM T(15) 


définit un tableau à une dimension ayant 16 variables numériques : 
T(O), T(1), T(2), …, T(16). 


DIM A(20,30) 


définit un tableau à deux dimensions ayant 21x31 éléments ou 
variables numériques. 


DIM A1(15),A2(20) 


définit deux tableaux à une dimension, A1 et A2, ayant respective- 
ment 16 et 21 éléments. 


DIM A$(30) 


définit un tableau à une dimension ayant 31 variables de chaîne 
comme éléments. 
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COMMENTAIRES 


Ilest possible d'utiliser dans un programme des variables de tableau 
(ou variables indicées) qui n’ont pas été définies au préalable par une 
instruction DIM, à condition que les indices correspondants n’excè- 
dent pas 10. Lorsque l'indice d’une variable appelée dépasse celui 
qui est spécifié dans l'instruction DIM, un message d'erreur ‘’Subscript 
out of range in xxx’’ (indice hors limites à la ligne xxx) est affiché. 

Une seule instruction DIM peut être utilisée pour dimensionner plu- 
sieurs tableaux, comme dans le troisième exemple donné ci-dessus. 
Il ne s’agit cependant pas d’une obligation ; un programme peut 
comporter autant d'instructions DIM qu'on le souhaite. 

L'indice de la première variable d’un tableau est toujours égal à 
0. Le nombre maximal de dimensions possibles pour un tableau ainsi 
que le nombre maximal d'éléments par dimension sont limités par 
la taille de la mémoire disponible et par la longueur du programme 
utilisant ce tableau. Le programme qui illustre l'instruction ERASE 
montre comment calculer la place mémoire disponible ou celle qui 
est occupée par un tableau. Cette instruction permet également de 
redimensionner plusieurs fois un même tableau dans un programme. 

Tant qu'une valeur n’a pas été assignée à une variable d’un tableau 
dimensionné, celle-ci est égale à O (valeur par défaut), qu'il s'agisse 
d'une variable numérique ou d’une variable de chaîne. 
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DRAW et DRAWR 


Les instructions DRAW et DRAWR permettent de tracer une ligne 
sur l’écran à partir de la position courante du curseur graphique. 
L'instruction DRAW est associée à des coordonnées absolues, tandis 
que l'instruction DRAWR est associée à des coordonnées relatives. 


FORMATS 


DRAW coordonnée x, coordonnée v<, numéro d'encre > 
< ,mode d’encre > 


DRAWR déplacement x, déplacement y < ,\numéro d’encre > 
< mode d’encre > 


e Le numéro d’encre peut prendre une valeur comprise entre O et 
15 en fonction de l'encre choisie. 


e Le mode d’encre est un paramètre qui n'existe que sur le CPC 664 
et le CPC 6128 ; il peut prendre les valeurs 0, 1, 2, 3 ou 4 suivant 
le mode d'interaction avec les couleurs de l’écran graphique. 


COMMENTAIRES 


Les instructions DRAW et DRAWR offrent au programmeur une 
multitude de possibilités graphiques. 

Sur les modèles CPC 664 et 6128, il est possible de réaliser une 
opération logique (paramètre mode d'encre) entre la couleur du stylo 
ou du papier en cours et l’ancienne couleur dans laquelle était affiché 
le pixel. Ces opérations sont les suivantes : 


Pas d'opération 
OÙ exclusif (XOR) 
ET (AND) 






OU (OR) 
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La couleur dans laquelle sera affiché le point concerné sur l’écran 
graphique dépendra du résultat de l’opération logique réalisée sur 
les deux valeurs. Rappelons que les opérations logiques sont effec- 
tuées bit à bit, sur les octets correspondants. Supposons par exemple 
qu'un pixel soit originellement affiché dans la couleur 8 et qu’il soit 
affecté par une instruction DRAW de paramètres 2 pour le numéro 
d'encre et 1 pour le mode d'encre. Pour connaître la couleur dans 
laquelle s’affichera le pixel, l'opération binaire suivante doit donc être 
effectuée : 


00001000 XOR 00000010 


Le résultat de cette opération (voir la rubrique ‘Opérateurs 
logiques’’) est 00001010, nombre binaire correspondant à la couleur 
10. Supposons que l'instruction DRAW soit exécutée une seconde 
fois sur ce même point, avec la même valeur des paramètres numéro 
et mode d'encre. L'opération logique réalisée sera donc la suivante : 


00001010 XOR 00000010 


Le résultat est 00001000, ce qui correspond à la couleur 8. Le point 
se réaffichera donc dans la couleur qui était la sienne avant l’exécu- 
tion des deux instructions DRAW. Cette propriété est tout à fait typique 
de l'opérateur XOR qui peut être ainsi utilisé, avec les instructions 
graphiques qui le permettent, pour ‘‘’allumer’’ où ‘’éteindre’’ un point. 


EXEMPLE DE PROGRAMME 


Le programme ci-dessous trace sur l'écran le graphe de la fonction 
Y = EXP(aX) + SIN(X) + b dans un repère orthonormé (les axes X 
et Y sont perpendiculaires). 

Ce programme est divisé en quatre parties correspondant respec- 
tivement à l’initialisation et au tracé du cadre (lignes 10 à 100), au 
tracé des axes (lignes 110 à 150), à la mise en place de la graduation 
(lignes 160 à 280) puis au tracé de la fonction (lignes 290 à 350). 


19 CLS 

20 MODE 2 

30 BORDER 3 

40 ORIGIN 0,0 

48 — 
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QD CHR HHH HOME EEE DE DEEE DEEE EEE 
30 ‘ Trace du cadre 
5 LD DE DE MED DE DE DE DE DE DE DE DE DE DEEE DE DEEE DE DE JE 
60 MOVE G,0 
70 DRAW 679,0 
80 DRAW 6:9,:99 
90 DRAW 0,599 
190 DKAW 0,0 
108 ‘ 
LD CHOMOHMEOHEOMEODEHEOHECMEODE MEME MEME DE DE DE NE EEE 
110 ‘ Trace des axes 
LA RÉ EEOEDEDEDEDE DE DEHEHERE DE DEEE DE DEEE NE 
20 MOVE 19,199 
150 DRAWR 600,0 
140 MOVE 319,9 
150 DRAWR 0,2:79 
1358 ‘ 
159 HE HEMOHEME DE DE DE DE DE DE DE DE DE DE DE DE DE DEEE 
160 ‘ Trace des graduations 
LOL HER DEDE DE DEEE DE DE DE DEEE DE DE DE DE 
170 MOVE 19,199 
180 FOK I1=19 TO 619 STEF 20 
190 MOVE 1,199 
200 MOVER 0,5 
DRAWR O,—-10 
NEXT I 
MOVE 519,9 
FOR 1=9 T0 589 STEF 58 
MOVE 319,1 
MOVER —5,0 
DRAUWR 6,0 
NEXT I 
Trace de y=sin(x) 
MOVE 19,199 
X:=0) 
FOR I=0 TO XOKFI STEF SKxFIl/100 
X=X+1 
DKAW X+19, CEXF (-0, OZHT) SIN CI) #190) +(199+9) 
NEXT [I 


FRERE DE DE DE DE DEEE DE DE MERE DE DE DE DE DE DEEE 
Éoucle d'attente 

FRERE DE DE DEN DE DE DE DE DE DER EE DE EEE EE 

CE= LR LI 

280 WHILE Cet" os CH=INEEYS s WEND 

390 MODE 1 

400 END 








_ 80 — 
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La commande EDIT permet d'afficher une ligne quelconque de pro- 
gramme sur l'écran puis de la modifier à l’aide des commandes d’édi- 
tion (touches flèche, touches Clr et Del, ….). 


FORMAT 


EDIT numéro de ligne 


COMMENTAIRES 
Il existe plusieurs moyens d'éditer une ligne de programme (voir 


en particulier la commande LIST). Le Chapitre 2 contient un para- 
graphe présentant les possibilités d'édition offertes par l’Amstrad. 
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s. ë Ce 2 * : 
L'instruction END met fin à l'exécution du programme et renvoie en 
mode direct après fermeture de tous les fichiers qui ont été ouverts 
au cours de l’exécution du programme. 


FORMAT 


END 


COMMENTAIRES 


Un programme peut comporter autant d'instructions END qu'on 
le désire, certaines pouvant être exécutées de manière conditionnelle 
(comme clause d’une instruction 1F...THEN...ELSE par exemple). A 
la différence de l'instruction STOP, END ferme tous les fichiers et ne 
génère pas de message d'interruption. L'instruction END, en tant que 
dernière instruction à exécuter dans un programme, est facultative. 
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EOF 


La fonction EOF permet de tester si la fin d’un fichier (ouvert sur cas- 
sette ou sur disque) est atteinte. 


FORMAT 
x = EOF 
COMMENTAIRES 


La fonction EOF retourne la valeur —1 (vrai) si aucun fichier n’est 
ouvert ou si la fin du fichier est atteinte lors d’une lecture au moyen 
des instructions INPUT# et LINE INPUT#,. Si le caractère de fin de 
fichier (1A) n’est pas rencontré au cours de la lecture, la valeur O est 
retournée par la fonction. 


EXEMPLE DE PROGRAMME 


Le programme de ‘‘’carnet d’adresses’’ qui illustre les commandes 
OPENIN et OPENOUT utilise la fonction EOF lors de la lecture du 
fichier ‘AGENDA’. Tant que la fin du fichier n’est pas atteinte (WHILE 
NOT EOP), la valeur de INC% est incrémentée de 1 puis une chaîne 
de caractères est lue et assignée à la variable T$(INC%). Lorsque le 
caractère de fin de fichier est rencontré, la fonction EOF retourne 
la valeur —1 et l'exécution de la boucle de lecture prend fin. 
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,. ë L : ) À 
L'instruction ERASE efface de la mémoire centrale de l'ordinateur les 
tableaux spécifiés comme paramètres de cette instruction. 


FORMAT 
ERASE nom de tableau < ,nom de tableau > 


° nom de tableau désigne les noms des tableaux qui doivent être 
effacés et qui ont été déclarés auparavant dans une instruction DIM. 


Exemples 
ERASE A 

efface le tableau A ; 
ERASE A,B 


efface les tableaux A et B. 


COMMENTAIRES 


Cette instruction permet de libérer de la place en mémoire centrale 
de l'ordinateur si certains tableaux sont devenus inutiles. Lorsqu'un 
tableau a été ainsi effacé, il est toujours possible de le redimensionner 
plus loin dans le programme (avec une instruction DIM). L’efface- 
ment est même un préalable indispensable à toute opération de 
redimensionnement. 


EXEMPLE DE PROGRAMME 


Ce programme a pour objet de calculer la place occupée en 
mémoire centrale de l’ordinateur par des tableaux de valeurs numé- 
riques. Ces tableaux ont différentes tailles et différentes formes. L'ins- 
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truction ERASE est utilisée ici en conjonction avec la fonction FRE 
qui renvoie, lorsqu'elle est appelée, la place mémoire restant dispo- 
nible (voir la description de cette fonction). 

Trois tableaux T1(1), T2(J) et T3(K) ayant chacun une seule dimen- 
sion mais un nombre d'éléments différent (11, 101 et 1001, respecti- 
vement) sont tout d’abord dimensionnés (ligne 20). Le sous- 
programme de calcul qui commence à la ligne 150 et qui se termine 
à la ligne 210 est ensuite appelé une première fois (ligne 70). Ce sous- 
programme calcule la place mémoire disponible (en nombre d’octets) 
avant et après l'effacement d’un tableau au moyen de l'instruction 
ERASE ; la différence est affichée. A la ligne 210, les trois tableaux 
ont été effacés de sorte qu’il est possible de les redimensionner, lors 
du retour au programme principal (ligne 90). La même opération est 
ensuite recommencée pour trois autres tableaux à deux dimensions 
(lignes 90 à 130). 


10 CLS 

so DIM TLCIO) , TE C1O0) , TE C1O0O) 

30 A#(ld)="io" 

40 AF(2)="100" 

50 AFCE)=" 1000" 

60 FRINT "Dimension", '"Nombre d'octets oc 
cupes" 

65 FRINT 5 FRINT 

70 GOSUE 150 

80 FRINT 

GO DIM Ti(10,10),T2(010,100) ,T5 (5, 1000) 
100 AH(1)="10 + 10" 

110 AFCZ)="10 % 100" 





120 A$CH)=" 5 * 1000" 
120 GOSUER 150 

140 END 

150 AÏ=FRE(1) : ERAGSE Ti 

160 AZ=FRE(1) : PRINT A#(1) ,AZ-Ai 
170 AZ=FRE(1) : ERAGE TE 

180 AZ=FRE(1) : PRINT A#(2) ,AS-A7 
190 AZ=FRE(1) : ERASE TS 


200 A4=FRE(1) 
210 RETURN 


FRINT A#(CI),44-AS5 


L'exécution de ce programme permet plusieurs constatations : 


e La place mémoire réservée pour des variables dimensionnées est 
occupée, que les tableaux correspondants soient ou non remplis 
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(dans cet exemple ils ne le sont pas, de sorte que tous les éléments 
sont initialisés à zéro). 

e Chaque élément de tableau (numérique) est un nombre stocké sur 
5 octets. 


e Le premier indice d’un tableau est toujours 0. Ainsi, un tableau 
à une seule dimension du type T2(100) aura 101 éléments : de 
même, un tableau à deux dimensions du type T3(5,1000) aura 
6 x 1001 = 6006 éléments. 


e Les tableaux à deux dimensions requièrent 12 octets de plus par 


tableau. 


Un tel calcul peut être utile afin d'estimer le nombre de valeurs 
numériques pouvant être stockées en mémoire centrale, en fonction 
de la configuration du système. 
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AE 


L'instruction EVERY... GOSUB provoque un branchement vers un sous- 
programme à intervalles de temps réguliers. 


FORMAT 
EVERY n1<,n2> GOSUB numéro de ligne 


e n1 est un nombre entier spécifiant l'intervalle de temps au bout 
duquel le sous-programme associé doit être exécuté. L'unité de 
temps définie est égale à 0,02 seconde (1/50) ; la valeur 50 corres- 
pond donc à 1 seconde. 


e n2 est un nombre entier caractérisant le chronomètre associé à 
l'instruction. L'Amstrad possède quatre chronomètres numérotés 
de 0 à 3. Si n2 n’est pas spécifié, la valeur prise par défaut est O. 


e Le numéro de ligne est celui de la première ligne du sous- 
programme à exécuter à intervalles de temps réguliers. Le sous- 
programme doit se terminer par une instruction RETURN. 


COMMENTAIRES 


Un sous-programme peut être associé à chacun des quatre chro- 
nomètres ; leur exécution est obtenue lorsque les quatre conditions 
suivantes sont simultanément réalisées : 


e Le temps spécifié dans l'instruction EVERY...GOSUB est écoulé. 


e II n'y a pas de branchement en attente spécifié par un chronomètre 
ayant un ordre de priorité plus élevé. L'ordre de priorité des chro- 
nomètres est le suivant : 3, 2, 1, O. 


e II n'ya pas d'instruction en cours d'exécution ; sinon il faudra atten- 
dre qu’elle soit terminée pour que le sous-programme puisse être 
lancé. Cela est particulièrement important pour des instructions 
telles que INPUT et LINE INPUT dont le temps d'exécution dépend 
essentiellement de l'utilisateur. 


S'h8 = 


e Il n'y a pas de sous-programme contenant l'instruction DI en cours 
d'exécution. En effet, l'instruction DI placée au début d’un sous- 
programme interdit son interruption par une instruction 
AFTER...GOSUB ou EVERY...GOSUB tant que la commande El ou 
la fin du sous-programme (RETURN) n’est pas rencontrée. 


Le temps d'exécution du sous-programme appelé par l'instruction 
EVERY...GOSUB ne doit pas être supérieur où égal à l'intervalle de 
temps nl ; dans le cas contraire, le sous-programme sera exécuté 
indéfiniment. 


EXEMPLE DE PROGRAMME 


Le programme associé à la commande AFTER... GOSUB illustre l’uti- 
lisation de l'instruction EVERY...GOSUB. L'utilisateur dispose de 
10 secondes pour donner une réponse ; toutes les secondes, le temps 
restant est affiché à l'écran. La ligne 110 génère une interruption et 
l'exécution d'un sous-programme qui modifie la valeur associée au 
chronomètre. 
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ABS, ATN, CINT, COS, CREAL, 
EXP, FIX, INT, LOG, LOG10, 


MAX, MIN, ROUND, SGN, SIN, 
SOR, TAN, UNT 





Les fonctions arithmétiques n’opèrent que sur des expressions algé- 
briques (et non sur des chaînes de caractères). Elles fournissent un 
résultat numérique. 

Toutes ces fonctions (à l'exception de MIN, MAX et ROUND) ont 
le même format : le mot clé désignant la fonction est immédiatement 
suivi de parenthèses contenant l'expression à calculer. Par exemple : 


COS(X) CINT(3.25) EXP(3*(5 +Y)/2) 


Les fonctions arithmétiques peuvent être regroupées en différentes 
classes : 


FONCTIONS TRIGONOMÉTRIQUES 


Les fonctions trigonométriques sont les suivantes : 


ATN(X) Calcule l'arc tangente de X 


COS(X) Calcule le cosinus de X 
SIN(X) Calcule le sinus de X 
TAN(X) Calcule la tangente de X 





La fonction ATN(X) calcule l’arc tangente de X, c’est-à-dire l'angle 
dont la tangente est égale à X. Le résultat est exprimé par défaut en 
radians ; si la commande DEG a été exécutée auparavant, le résultat 
est obtenu en degrés. Il est aussi possible de multiplier le résultat par 
(180/3.141593), 180 degrés correspondant à 3.141593 radians. 

L'argument X des autres fonctions trigonométriques est également 
exprimé par défaut en radians, l'instruction DEG permettant là aussi 
de changer le mode par défaut. 
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FONCTIONS DE TRONCATURE ET D'ARRONDI 


Ces fonctions prennent comme argument X une expression numé:- 
rique quelconque. Elles opèrent de la manière suivante : 


BR EE 


ABS(X) Donne la valeur absolue de X 
FIX(X) Fournit la partie entière de X 


INT(X) Fournit le plus grand entier inférieur ou égal à X 
ROUNDU(Xr) Arrondit la partie décimale de X au nombre de chiffres 
après la virgule spécifié par r 





Les fonctions FIX(X) et INT(X) sont très semblables, sauf lorsque 
l'argument X est un nombre négatif. Dans ce cas, la fonction FIX(X) 
renvoie l’entier supérieur (celui qui a la valeur absolue la plus faible), 
alors que la fonction INT(X) renvoie l’entier inférieur. Les limites auto- 
risées pour les nombres entiers sont —32768 et 32767. 

La fonction ROUNDU(X,r) n’a d'intérêt que pour les valeurs réelles 
de X (elle ne modifie pas un nombre entier). Les zéros non significa- 
tifs de la partie décimale sont supprimés par la fonction. 


Exemples 
PRINT ROUND(2.1234567,3) 

Le résultat affiché est 2.123. 
PRINT ROUND(-0.230001,4) 


Le résultat est —0.23. 


LES FONCTIONS DE CONVERSION DES NOMBRES 
(ENTIERS/REELS) 


Deux fonctions permettent de convertir un nombre réel en nombre 
entier et réciproquement : CINT et CREAL. Une troisième fonction, 
UNT, permet de signer un nombre entier. 
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CINT(X) Convertit X en un nombre entier 


CREAL(X) Convertit X en un nombre réel 
UNT(X) Convertit un entier non signé X en un entier signé 





Les nombres réels sont compris entre —1.7E-38 et 1.7E+38 (la 
lettre E symbolise la notation scientifique et se lit ‘10 puissance’’). 
Le plus petit nombre positif est 2.9E-—39. Les nombres décimaux 
peuvent comporter jusqu’à dix chiffres après la virgule (en l’occur- 
rence le point, en notation informatique). 

Les nombres entiers algébriques ont toujours un signe (même si 
celui-ci n’est pas nécessairement affiché, le signe étant facultatif pour 
les nombres positifs). Il n’en est pas de même pour les nombres expri- 
mant une adresse mémoire. Aussi est-il nécessaire de leur donner un 
signe (de les signer) pour pouvoir les manipuler dans certaines expres- 
sions algébriques. C'est précisément l’objet de la fonction UNT (qui 
ne peut opérer que sur des entiers décimaux, hexadécimaux ou 
binaires, en spécifiant les préfixes &H où &X correspondants). 


FONCTIONS TRANSCENDANTES 


Ces fonctions retournent un résultat sous la forme d’un nombre réel. 


EXP(X) Calcule l’exponentielle de X 


LOG(X) Calcule le logarithme naturel (ou népérien) de X 
LOGTO(X) Calcule le logarithme décimal de X 





L'argument X de la fonction EXP(X) doit être inférieur à 88,1 sous 
peine de débordement de capacité (Overflow). 

L'argument X des fonctions LOG({X) et LOG10(X) doit nécessaire- 
ment être un nombre positif. 


AUTRES FONCTIONS ARITHMÉTIQUES 


Les fonctions arithmétiques du BASIC Amstrad n’entrant pas dans 
les catégories précédemment établies sont les suivantes : 
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MAX(X1,...,Xn) Retourne la plus grande des valeurs parmi les arguments 
X1 à Xn fournis 


MIN(X1,...,Xn) Retourne la plus petite des valeurs parmi les arguments X1 
à Xn fournis 


SGN(X) Permet de connaître le signe de X 
SQR(X) Calcule la racine carrée de X 





Les arguments fournis aux fonctions MAX et MIN peuvent être des 
constantes ou des expressions algébriques (valeurs réelles ou entières). 

La fonction SGN(X) renvoie la valeur 1 si X est positif, O si X est 
nul et —1 si X est négatif. 

Toutes les fonctions mathématiques usuelles (arcsin, cosh, sinh, etc.) 
ne sont pas préprogrammées en BASIC Amstrad. Il est cependant pos- 
sible de définir toute fonction supplémentaire de son choix, au moyen 
de l'instruction DEF FN (voir la description de cette instruction). 

Le tableau suivant indique les formules permettant de calculer cer- 
taines de ces fonctions au moyen des fonctions arithmétiques inté- 
grées au BASIC Amstrad : 


Sécante SEC(X) = 1/COS(X) 

Cosécante CSC(X) = 1/SIN(X) 

Cotangente COTG(X) = 1/TAN(X) 

Arcsinus ARCSIN(X) = ATN(X/SQR(- X+X — 1)) 
Arccosinus ARCCOS(X) = — ATN(X/SQR(-XxX + 1))+1.5708 
Arccotangente ARCCOT(X) = ATN(X) + 1.5708 

Sinus hyperbolique SINH(X) = (EXP(X) — EXP(-— X))/2 

Cosinus hyperbolique COSH(X) = (EXP(X) + EXP(— X))/2 

Tangente hyperbolique TANH(X) = EXP(-— X)/(EXP(X) + EXP(— X))x2 +1 
Cotangente hyperbolique COTH(X) = EXP(-— X)/(EXP(X) — EXP(-— X))+2 +1 
Arcsinus hyperbolique ARCSINH(X) = LOGI(X + SQR(X+X + 1)) 
Arccosinus hyperbolique ARCCOSH(X) = LOG(X + SQR(X+X — 1)) 
Arctangente hyperbolique ARCTANH(X) = LOG((1 + X)/(1 — X))/2 
Arccotangente hyperbolique | ARCCOTH(X) = LOG((X+ 1)/(X— 1))/2 
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EXEMPLE DE PROGRAMME 


Le programme ci-dessous utilise (lignes 130 à 160) les fonctions SIN 
et COS pour définir les coordonnées de deux points de l'écran (PO 
de coordonnées X0 et YO et P1 de coordonnées X1 et Y1). Le stylo 
est ensuite placé sur le premier point (ligne 170) puis une droite est 
tracée entre les deux points (ligne 180). Cette boucle d'instructions 
est réitérée pour des valeurs de | variant de 0 à 2 PI avec un pas 
d'incrémentation de P1/128 (lignes 120 à 190). 


10 CLS : CLG 

#0 MODE 

“Ù BORDER 9 

40 GRAFHICS FAFER © 
JO INE 0,0 

60 GRAFHICS FEN 1 
70 INF p 





V=51/64%H 

FOR I=0 TO SxFl STEF F1/178 
XO=X+H/2*#C0S (1) 
YVO=Y+V/ZBXSINCI) 
X1=X+HxC0S (2K1) COS (I) 
YI=Y+VRSIN (ZI) COS CL) 

MOVE XO,YO 

DRAW X1,YI 

NEXT I 

CH=INÉEYS : IF C#="" THEN 200 
MODE 1 

INE ©, 1 

INH 1,24 

END 
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FILL Instruction 
(CPC 664 et CPC 6128) 


1. . x . .. 
L'instruction FILL colore, à partir de la position courante du curseur 
graphique, une zone fermée de l'écran. 


FORMAT 
FILL numéro d'encre 


° Le numéro d’encre est une valeur comprise entre O et 15 ; il carac- 
térise l'instruction INK associée. 


COMMENTAIRES 


Si aucune zone n’a été définie, la totalité de l'écran est colorée, 
à l'exception des lignes qui ont été tracées à l’aide des instructions 
DRAW et DRAWR. De même, si le curseur graphique est placé à l’in- 
térieur d’une figure qui n’est pas fermée, la couleur ‘‘déborde’’ et 
se répand à l'extérieur. 


EXEMPLE DE PROGRAMME 


Le programme ci-après illustre l’utilisation de la commande FILL. 
La ligne 60 colore la totalité de l'écran avec l'encre n° 3 qui a la cou- 
leur rouge vif, puis un cercle noir (qui n’est pas complètement fermé) 
est tracé au milieu de l'écran (lignes 110 à 130). Le curseur graphi- 
que est placé ensuite au centre du cercle (ligne 140) et l’intérieur de 
la figure est rempli avec une encre jaune (ligne 150). 

On remarque que la zone colorée est limitée par les lignes tracées 
par les commandes DRAW précédentes ; lors de la première itéra- 
tion, la zone n’est pas fermée (le paramètre J varie entre O et 1,98 PI) 
et l'encre déborde à l'extérieur du cercle pour remplir la totalité de 
l'écran. Lors de la seconde itération, le paramètre J varie de 0 à 2 PI 
et le cercle est complètement fermé. 
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10 CLS 

20 RORDER 6 

F0 INE 3,6 

40 INK 2,0 

30 FOR J=i TO ? 

60 FILL 35 

70 GRAFHICS FEN 2% 

80 ORIGIN 320,200 

90 MOVE 140,0 

100 IF Je2 THEN Fe2xlFl ELSE F=e2BxPI-(CZxFI 
/100) 

110 FOR Iz= © TO F STEF 2«F1/100 
120 DRAW COS(I)#140,SIN(I)+140 
150 NEXT I 

140 MOVE 0,0 

150 FILL 1 

160 LOCATE 1,25 

170 FRINT "Tapez une touche": 
180 Céz"n 

190 WHILE CÆ="" ss CH=INEEYS : WEND 
200 CLS 

#10 NEXT J 
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FOR, NEXT et STEP 


Les instructions FOR et NEXT permettent d'exécuter, de manière répé- 
titive, une suite d'instructions pour différentes valeurs d’une variable 
incrémentée par l'argument de STEP. 


FORMATS 


FOR variable=x TO y < STEP z> 


NEXT < variable > < ,variable > 


variable est une variable numérique utilisée comme compteur. 


e x est une expression numérique qui positionne la valeur initiale 
du compteur. 


e y est une expression numérique qui fixe la valeur finale du 
compteur. 


e z est une expression numérique qui spécifie l’incrément de la 
variable. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


STEP z est optionnel ; s’il est omis, la valeur par défaut de l’incré- 
ment est égale à 1. 

Les instructions figurant entre FOR (TO) et NEXT sont exécutées 
en prenant x comme valeur de la variable. Le compteur est ensuite 
incrémenté et la suite d'instructions est à nouveau exécutée, avec 
cette fois (x+z) comme valeur de la variable. L'opération se pour- 
suit tant que la valeur de la variable n'excède pas y. Quand cela se 
produit, les instructions qui suivent l'instruction NEXT sont à leur tour 
exécutées (sortie de la boucle FOR/NEXT). 

z peut être négatif, auquel cas la variable est décrémentée de x 
à y. Des valeurs de x, y et z incompatibles ne provoquent ni mes- 
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sage d'erreur ni interruption de l'exécution du programme ; la boucle 
FOR/NEXT et les instructions qui y figurent sont simplement ignorées. 
Il y a incompatibilité dans les deux cas suivants : 


e lorsque x est supérieur à y, z étant positif ; 
e lorsque x est inférieur à y, z étant négatif. 


Il est recommandé, dans la mesure du possible, d’initialiser le 
compteur avec des nombres entiers (bien que les valeurs décimales 
soient également admises). La spécification du nom de la variable 
après l'instruction NEXT est optionnelle (elle ralentit d’ailleurs légè- 
rement la vitesse d'exécution du programme). Cette spécification est 
cependant nécessaire en cas d'utilisation de plusieurs boucles 
FOR/NEXT imbriquées (c'est-à-dire lorsque des boucles FOR/NEXT 
sont insérées à l’intérieur d’autres boucles FOR/NEXT). Des boucles 
imbriquées doivent avoir pour compteurs des variables de noms dif- 
férents. L'instruction NEXT correspondant à la boucle intérieure doit 
toujours apparaître avant celle qui correspond à la boucle extérieure. 
Cependant, dans le cas où des boucles imbriquées ont le même point 
final, une seule instruction NEXT peut être utilisée pour toutes les 
variables. Par exemple, les lignes consécutives : 


110 NEXT | 
120 NEXT J 
130 NEXT K 


peuvent être remplacées par la ligne : 
110 NEXT I,J,K 
Dans un programme, l'instruction FOR doit toujours être rencontrée 
avant l'instruction NEXT correspondante. Dans le cas contraire, le 


message d'erreur ‘’Unexpected NEXT'’ (NEXT mal positionné) est 
affiché. 


EXEMPLE DE PROGRAMME 


Cet exemple illustre une manière possible de remplir et d'afficher 
à l'écran un tableau à deux dimensions. Chaque élément de ce 
tableau, B$(1,J), représente le résultat (sous forme d’une chaîne de 
caractères) d’une rencontre sportive ayant opposé les deux équipes 
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nationales | et J. Quatre équipes A$(1) ont participé à la compétition, 
chacune ayant rencontré les trois autres deux fois (matchs aller et 
retour). 

Les résultats des rencontres sont tout d’abord entrés au clavier, en 
réponse aux questions affichées. Dès que les résultats des douze ren- 
contres sont entrés, le programme les affiche sous forme d’un tableau 
synoptique. Pour retrouver le résultat d’une rencontre particulière, 
par exemple Italie-Espagne, il suffit de regarder la valeur indiquée à 
l'intersection de la ligne Italie et de la colonne Espagne. Le format 
d'impression donné dans le programme est optimal pour des résultats 
exprimés sous la forme x—y (1-0, 5-3, etc.). La seconde partie du 
programme (lignes 240 à 420) permet d'établir le classement des 
quatre équipes en fonction des résultats obtenus. Ce classement n'est 
exact que dans le cas où le format x —y a été respecté pour l'entrée 
des résultats. Cette seconde partie de programme est explicitée en 
illustration des fonctions LEFT$ et RIGHTS. 


19 CLS 
20 ACL) S="ESPAGNE" + AE C2) = "FRANCE "3 À 
# CH) e"ITALIE " + A$(4)="SUISSE " 

50 PRINT "ENTREZ LE RESULTAT DES RENCONT 
GS": PRINT + FRINT 

FOR Ii TO 4 

FOR Jæ1l TO 4 

IF I=J THEN BECI,J)æ" =" ELSE PRINT 
ACL)" AE CJ)s 2 INEUT BEI, d) 

70 HBECI,J)e" M4RECI,J) 

80 NEXT J 

90 NEXT 1 











100 
LAC OR EOMOREOMEOREOM DE OMOME DER DÉC HE DE DE DE EME RE DEN EME ME RE EE DER HE HER 
120 MISE EN FORME DU TABLE AL) 


LEO IRD MEME HE DE HD DE DE DEN DEN HE HE DE HE DE EDEN HE ME DEREDEÉ DENEREE ENE 
140 CLS 

150 FRINTe FACINT TAR (9) AE Ci) TR C7) À#ÆC 
STARCES) AE CH): TAK A € 4) 

FÜR Iæi TO 4 

FRINT 8 FRINT 

FOR Jai TO 4 

FOR Eli TO 4 : BÆECE, O0) AE CE) 8 NEXT 














IF POS (HO) 25 THEN PRINT CHRE (15) 
200 PRINT TAH(G#J) B&(CI,J)3 

210 NEXT J 

NEXT I 
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D SSL 
ETABLISSEMENT DU CLASSEMENT 

FORME EME MERE DE EE DÉCMNDEE DEDENEDÉEENE EREEEE DEREDÉXE EXE D 

FOR I=1 TO 4 

FOR Jæi TO 4 

B#CI,J)=RIGHTE(B#(I,J) ,2) 

IF I<3>J THEN IF LEFT#(R#(I,9),1) > R 





IGHTECRECT,J9,1) THEN A(ID)=ACI)+2 ELSE I 
F LEFTH(RE(CI,J) ,1)€RIGHTECRECI,J) ,1) THE 
NO ACJ)=A(J)+2 ELSE A(I)=ACI)+1:A€(J)=A (4) 
+i 


NEXT J 

NEXT I 

PRINT 3 FRINT 

FOR Lei TO Z 

« FOR J=(I+1) T0 4 

360 IF ACI)SA(J) THEN DaA(I) : Al)=At(J) 
5 ACJ)=D 5 DEmAECT) ss AFCI)EAE CI) à AE 

dJ)=D# 

370 NEXT J 

280 NEXT I 









590 INK 1,26:INE O,1 

400 PRINT 2 FRINT : FRINT "Classement" 
PRINT 3 FRINT 

410 FOR I=i TO 4 : PRINT A#CI) ,ACI) 3 NE 
XT I 

420 END 


Lignes 40 à 90 


Les résultats sont entrés au clavier et stockés dans les variables B$(1,J) 
au moyen de deux boucles FOR/NEXT imbriquées. L’instruction 
IF... THEN...ELSE de la ligne 60 permet d'éviter la demande du résul- 
tat d’une rencontre qui ne peut s'être déroulée (c'est-à-dire lorsque 
les variables | et J correspondent à la même équipe). Dans ce cas, 
un tiret (précédé d’un espace afin de conserver un format d’impres- 
sion correctement centré) est stocké dans la variable B$(1,J) corres- 
pondante. La ligne 70 ajoute deux espaces à gauche de chaque résultat 
(afin que ceux-ci soient mieux centrés dans le tableau, en regard du 
format choisi pour l'affichage du nom des équipes). 


Ligne 150 


Affichage sur une ligne du nom des quatre équipes, en utilisant la 
fonction TAB. 
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Lignes 160 à 220 


Affichage des résultats, chaque ligne commençant par le nom d’une 
des quatre équipes. Trois boucles FOR/NEXT imbriquées sont utilisées 
à cet effet. La boucle centrale (ligne 180) permet d’affecter le nom 
contenu dans la variable A$(K) à la variable correspondante B$(K,0). 
Cela ne modifie rien aux résultats déjà stockés, puisque les variables 
B$(1,J) d'indice 0 n’ont pas été utilisées à ce propos. De cette manière, 
chaque ligne du tableau (écrite par la boucle FOR/NEXT ayant J pour 
variable) commence effectivement par un nom d'équipe (J=0) et 
continue par quatre résultats, le format de l'affichage étant défini par 
l'instruction PRINT TAB de la ligne 200. La ligne 190 permet d'ajouter 
un retour chariot, dont le code ASCII est CHR$(13), après l'affichage 
du quatrième résultat, ce qui correspond à un changement de ligne 
pour chaque valeur différente de la variable I. 
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Instruction FRAME 
(CPC 664 et CPC 6128) 


L'instruction FRAME est destinée à synchroniser l'affichage de gra- 
phismes sur l'écran. 


FORMAT 


FRAME 


COMMENTAIRES 


L'instruction FRAME produit un effet de lissage du mouvement lors 
de l'affichage de caractères en mode graphique (associés à la 
commande TAG) ; leur apparition sur l'écran est moins saccadée. 


EXEMPLE DE PROGRAMME 


Le programme illustrant les commandes TAG et TAG OFF emploie 
(ligne 390) l'instruction FRAME. Celle-ci est réitérée avant chaque 
commande MOVE X2,1,2,1 qui déplace le curseur graphique ; elle 
est destinée à donner un aspect plus naturel et continu au dépla- 
cement de la voiture. 
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FRE 


La fonction FRE indique le nombre d’octets en mémoire centrale non 
occupés par les programmes et les données écrits en BASIC. 


FORMATS 


FRE(a) 
FRE(a$) 


e a et a$ sont des arguments fictifs, expression numérique (a) ou 
chaîne de caractères (a$). 


COMMENTAIRES 


La valeur renvoyée par la fonction FRE(a) ne dépend pas de l’ex- 
pression numérique a. De même, quelle que soit la chaîne de carac- 
tères a$, FRE(a$) retourne toujours la même valeur. Une chaîne x$ 
peut comporter jusqu'à 255 caractères. 

Un exemple d'utilisation de cette fonction est donné en illustra- 
tion de l'instruction ERASE. Le programme d'application permet de 
calculer la place mémoire occupée par des tableaux numériques de 
différentes tailles. On remarque qu'une variable numérique est stockée 
sur cinq octets et qu’une variable indicée (tableau) nécessite douze 
octets pour le descriptif du tableau. 

Lorsque la fonction FRE prend la forme suivante : 


FRE (°”) 


le résultat n’est pas affiché immédiatement ; le système effectue au 
préalable une récupération de l’espace non utilisé. En effet, étant 
donné que les variables alphanumériques peuvent avoir des tailles 
variant entre 1 et 255 octets, le BASIC gère de manière dynamique 
l’espace réservé aux variables alphanumériques et, chaque fois qu’une 
nouvelle valeur est assignée à la variable, l'adresse de sa zone de 
stockage varie. Ces adresses augmentent jusqu’à la limite de l’espace 
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disponible pour stocker les variables ; le BASIC effectue ensuite auto- 
matiquement une récupération de l’espace inutilisé afin de compacter 


la zone réservée au stockage des variables. La fonction FRE(‘‘’’) force 
cette réorganisation. 
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ERR, ERL, ERROR, 
ON ERROR GOTO, 





RESUME 


Ce groupe de fonctions et d'instructions permet de gérer les erreurs 
susceptibles de se produire lors de l'exécution d’un programme. 

Les fonctions ERR et ERL fournissent respectivement les numéros 
de code et de ligne associés à une erreur. 

L'instruction ERROR permet à l’utilisateur soit de définir ses propres 
codes d'erreur, soit de simuler l'apparition d’une erreur BASIC. 

L'instruction ON ERROR GOTO dirige l'exécution du programme, 
lorsqu'une erreur est rencontrée, vers le sous-programme de gestion 
des erreurs. 

L'instruction RESUME permet de reprendre l'exécution du pro- 
gramme principal après que la procédure de correction d'erreur a 
été mise en œuvre. 


FORMATS 
Le format de chacune de ces variables ou instructions est le suivant : 


ERR 
ERL 


ERROR expression entière 
e L'expression entière est comprise entre 0 et 255. 


ON ERROR GOTO numéro de ligne 
RESUME < 0 > 

ou RESUME NEXT 

ou RESUME numéro de ligne 
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RÈGLES DE SYNTAXE ET COMMENTAIRES 


Variables ERR et ERL 


ERR et ERL sont des variables dont le nom est réservé (et non pas 
des instructions). Elles ne peuvent donc être utilisées à d’autres fins 
que celles qui sont définies ci-dessous ; il est par exemple impossible 
de leur assigner une valeur au moyen d’une instruction d’assignation. 

Lorsqu'une erreur est décelée, l'exécution du programme est redi- 
rigée vers une section BASIC chargée de gérer les conditions d'erreur. 
A ce moment, la variable ERR reçoit comme valeur le numéro de 
code correspondant à l'erreur décelée et la variable ERL le numéro 
de la ligne où l'erreur s’est produite. Ces deux variables sont habi- 
tuellement utilisées dans des instructions IF... THEN pour transférer 
le contrôle au sous-programme chargé de gérer les erreurs. 

Pour tester une condition d'erreur dans un programme, il est 
conseillé de respecter la syntaxe suivante : 


IF ERL = numéro de ligne THEN... 


c'est-à-dire de placer le numéro de ligne à droite du signe égal. La 
syntaxe inverse (numéro de ligne = ERL) n’est pas incorrecte. Elle 
a cependant l'inconvénient suivant : si les lignes de programme sont 
renumérotées au moyen de la commande RENUM, le numéro de ligne 
donné comme valeur à ERL ne sera également modifié que si la pre- 
mière syntaxe a été employée. 

Lorsqu'une erreur se produit en mode direct, la variable ERL 
contient la valeur 65535. Pour tester l'éventualité d’une telle erreur, 
il convient d'utiliser l'instruction particulière : 


IF 65535 = ERL THEN... 


Instruction ERROR 


Si la valeur donnée comme argument à cette instruction est égale 
à l’un des codes d’erreur utilisé par le BASIC, ERROR simule l’appa- 
rition de cette erreur. Si un sous-programme de gestion d'erreur a 
été défini par une instruction ON ERROR GOTO, ce sous-programme 
est exécuté. Dans le cas contraire, le message correspondant au code 
d'erreur est affiché et l'exécution s'arrête. 
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Les codes des messages d'erreur sont donnés en annexe du guide 
de l'utilisateur livré avec l'ordinateur. Par exemple, les codes d’er- 
reur BASIC de l’Amstrad CPC 464 sont compris entre 1 et 30. L’utili- 
sateur pourra ainsi redéfinir tout message de son choix dont le numéro 
de code sera compris entre 31 et 255. Il convient toutefois de prendre 
garde, sur les modèles CPC 664 et CPC 6128, qu’un certain nombre 
de codes supplémentaires (les codes 30 et 31 en particulier) sont réser- 
vés aux erreurs disque (voir la fonction DERR). 

Pour définir son propre code d'erreur, il suffit de donner comme 
argument à l'instruction ERROR un numéro de code qui n’est pas 
déjà utilisé par le BASIC (ou par AMSDOS ou par le contrôleur de 
disquette, sur les modèles CPC 664 et CPC 6128). Ce nouveau code 
peut alors être testé, comme les autres codes, par un sous-programme 
de gestion des erreurs (voir l'exemple donné ci-après). 


Instruction ON ERROR GOTO 


Dès que cette instruction est rencontrée en cours d'exécution du 
programme, toute erreur (même une erreur en mode direct) est dirigée 
vers le sous-programme de gestion des erreurs, dont la première ligne 
doit constituer l'argument de cette instruction. Si l'argument corres- 
pond à un numéro de ligne qui n'existe pas, le message ‘’Line does 
not exist” (numéro de ligne non défini) est affiché. 

L'instruction particulière ON ERROR GOTO 0 a l'effet inverse : elle 
empêche le déroutement du programme en cas d'erreur. Les erreurs 
éventuelles rencontrées après l'exécution de cette instruction pro- 
voquent simplement l'affichage d’un message d'erreur et l'arrêt de 
l'exécution du programme. Il peut être utile d'inclure une telle ins- 
truction dans le sous-programme de gestion des erreurs, pour toute 
erreur pour laquelle aucune procédure de correction n'est prévue. 


Instruction RESUME 


RESUME est une instruction spécifiquement implantée dans un sous- 
programme de gestion des erreurs. Rencontrée ailleurs dans le pro- 
gramme, elle provoque l'affichage du message ‘’Unexpected 
RESUME” (RESUME sans gestion d'erreur). Selon le format utilisé, cette 
instruction a les effets suivants : 


RESUME ou RESUME 0 


— 108 - 


L'exécution du programme principal reprend à partir de l'instruction 
qui a provoqué l'erreur. 

Ilest conseillé d'utiliser le format RESUME de préférence à la forme 
équivalente RESUME O car, dans le second cas, un message d'erreur 
‘Line does not exist”’ (ligne non définie) risque d’être affiché en cas 
de renumérotation des lignes du programme au moyen de la com- 
mande RENUM (la ligne O n’est en effet généralement pas utilisée). 


RESUME NEXT 


L'exécution du programme principal reprend à l'instruction qui suit 
celle qui a causé l’erreur. 


RESUME numéro de ligne 


L'exécution reprend au numéro de ligne spécifié. 


EXEMPLE DE GESTION D'ERREUR 


Cet utilitaire de gestion d'erreur est destiné au programme de jeu 
donné en illustration de la rubrique ‘Opérateurs logiques”. Les quatre 
lignes ci-dessous doivent être ajoutées à celles du programme de jeu, 
sans rien modifier à celui-ci par ailleurs. 

Il s’agit de traiter les erreurs qui se produiraient si un joueur entrait 
une valeur et/ou une couleur de carte ne correspondant pas à celle(s) 
d'un jeu classique de 52 cartes. 


85 ON ERROR GOTO 300 


92 IF NOT (Y(N) < 14 AND YIN) > 0) THEN ERROR 220 


115 IF NOT (XIN) > O AND XIN) < 5) THEN ERROR 220 


300 IF ERR=220 AND ERL=92 THEN PRINT ‘La valeur proposée n'existe pas. 
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Recommencez'"":RESUME 90 ELSE PRINT “La couleur proposée n'existe pas. 
Recommencez'":RESUME 100 


La ligne 85 indique que le sous-programme de gestion d'erreur se 
trouve à la ligne 300. Toute erreur décelée après que la ligne 85 a 
été exécutée redirigera le programme vers la ligne 300. 

Si la valeur de la variable Y(N) n’est pas comprise entre 1 et 13, 
une erreur ayant 220 pour numéro de code sera détectée à la ligne 
92. De même, si la variable X(N) n’est pas comprise entre 1 et 4, une 
erreur (code 220) sera décelée à la ligne 115. D’après ce qui précède, 
l'exécution sera, dans l’un et l’autre cas, redirigée vers la ligne 300. 

La clause THEN de la ligne 300 est exécutée si les deux conditions 
ERR = 220 et ERL=92 sont simultanément réalisées, c’est-à-dire si la 
valeur de la carte entrée à la ligne 92 est erronée (d’où le message 
imprimé par la clause THEN). Dans le cas contraire (qui, d’après la 
ligne 115, correspond à ERR= 220 et ERL=115), la clause ELSE sera 
exécutée (erreur sur la couleur entrée). 
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GOSUB/RETURN 


L'instruction GOSUB détourne l'exécution d’un programme vers celle 
d'un sous-programme. L'instruction RETURN renvoie l'exécution vers 
le programme principal. 


FORMATS 


GOSUB numéro de ligne 


RETURN 


e Le numéro de ligne est celui de la première ligne du sous- 
programme. 


COMMENTAIRES 


Lorsqu'une instruction GOSUB est rencontrée au cours de l’exé- 
cution d’un programme, celui-ci est immédiatement dirigé vers le sous- 
programme dont le numéro de la première ligne est spécifié dans l'ins- 
truction GOSUB. Le sous-programme est exécuté jusqu’à ce qu'une 
instruction RETURN soit rencontrée. À ce moment, l'exécution du 
programme principal reprend à la première instruction se trouvant 
après GOSUB. 

Un sous-programme se distingue donc du programme principal par 
la présence, comme dernière instruction, de RETURN. Par contre, 
aucune instruction particulière n'indique qu'une ligne quelconque 
constitue la première ligne d’un sous-programme. Si le sous- 
programme est inséré à n'importe quel endroit du programme prin- 
cipal, il risque d’être exécuté inopportunément lorsque la ligne du 
programme principal qui le précède aura elle-même été exécutée. 
Cela peut être évité si l’on écrit, entre le sous-programme et le pro- 
gramme principal, une instruction permettant de contourner le sous- 
programme (par exemple GOTO, STOP ou END, selon le cas). La 
lisibilité d’un listing est cependant améliorée lorsque les sous- 
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programmes sont placés après le programme principal, avec un déca- 
lage important au niveau des numéros de ligne. 

Un sous-programme peut être appelé aussi souvent que nécessaire 
par le programme principal. Il peut d'autre part comporter plusieurs 
instructions RETURN, certaines s’exécutant de manière conditionnelle, 
au moyen d’une instruction IF...THEN par exemple. 

Un sous-programme peut en appeler un autre, l'instruction RETURN 
renvoyant toujours au programme ou au sous-programme appelant. 
L'instruction ON... GOSUB permet le branchement conditionnel vers 
différents sous-programmes, en fonction de la valeur de l'expression 
spécifiée par ON. 

Le programme donné enillustration de l'instruction ERASE constitue 
un exemple d'utilisation d'un sous-programme. 
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GOTO 


L'instruction GOTO déclenche un branchement inconditionnel vers 
une ligne spécifiée ; l'exécution normale du programme reprend (en 
mode direct) ou continue (en mode programme) à partir de la ligne 
spécifiée. 


FORMAT 


GOTO numéro de ligne 


COMMENTAIRES 


Le numéro de la ligne spécifiée. peut éventuellement contenir des 
instructions non exécutables, telles que REM où DIM. Dans ce cas, 
le programme se poursuit jusqu’à trouver une instruction exécuta- 
ble. Le mot clé GOTO peut également être utilisé dans des instruc- 
tions provoquant des branchements conditionnels (ON...GOTO), 
IF... GOTO), c'est-à-dire que le programme n'est dirigé vers la ligne 
spécifiée après GOTO que si une condition est réalisée (IF... GOTO). 
Il peut également être dirigé vers différentes lignes selon la valeur 
d’une expression (ON...GOTO). Lorsqu'il est utilisé seul, comme bran- 
chement inconditionnel, le mot clé GOTO constitue à lui seul une 
instruction. Par contre, dans un branchement conditionnel, l’instruc- 
tion est ON...GOTO ou IF...GOTO (voir la description de ces ins- 
tructions pour de plus amples informations). 

Ilest conseillé, dans la mesure du possible, d'éviter l'emploi répété 
de l'instruction GOTO dans un programme et de la réserver plutôt 
à une utilisation en mode direct (pour la mise au point par exemple). 
En effet, le listing d’un programme comportant un grand nombre d'ins- 
tructions GOTO peut s'avérer difficile et long à déchiffrer (même si 
l’on a écrit soi-même le programme), dans la mesure où les opéra- 
tions réalisées successivement par le programme sont dispersées et 
enchevêtrées au milieu de lignes de programme intervenant à une 
autre étape de l'exécution. Il est préférable de structurer l’organisa- 
tion d’un programme afin que ce qu’il réalise puisse être compris (et 
éventuellement modifié) à la simple lecture de son listing. 
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GRAPHICS PAPER Instructions 
et GRAPHICS PEN (CPC 664 et CPC 6128) 


Les instructions GRAPHICS PAPER et GRAPHICS PEN initialisent res- 
pectivement la couleur de l'encre de fond et la couleur du stylo pour 
le mode graphique. 


FORMATS 


GRAPHICS PAPER numéro d'encre 
GRAPHICS PEN numéro d'encre < mode du fond > 


e Le numéro d’encre est un nombre entier compris entre O et 15. 


e Le mode du fond prend la valeur O ou 1. 0 correspond à un fond 
opaque, tandis que 1 correspond à un fond transparent. 


COMMENTAIRES 


La mise en œuvre des instructions GRAPHICS PAPER et GRAPHICS 
PEN est identique à celle des instructions PAPER et PEN. 

Lorsque l'instruction GRAPHICS PEN est utilisée avec l'instruction 
TAG, les caractères écrits à un endroit quelconque de l'écran peuvent 
avoir un fond visible ou transparent (mode du fond 0 ou 1). 


EXEMPLE 


Le programme ci-après dessine une carte de France rouge sur un 
fond bleu. Les lignes 10 à 90 initialisent l'écran ; la couleur du fond 
est bleue et le stylo a la couleur noire. Ensuite, la carte est tracée 
et l’intérieur du dessin est rempli avec la couleur rouge (lignes 570 
et 580). La figure est fermée afin que, lors du remplissage, la couleur 
ne déborde pas. 

Les lignes 1020 à 1060 écrivent l'expression ‘Carte de France’ dans 
le bas de l'écran ; on remarque (ligne 1030) que le mode du fond 


ne 


est opaque, ce qui permet d'écrire les lettres sur un fond rouge (ligne 
1020). La ligne 1030 peut être modifiée de la manière suivante : 


1030 GRAPHICS PEN 1,1 


Le mode du fond est alors transparent ; les caractères sont écrits sur 
fond bleu. 







GIN 70,50 
CLG 


FAS DE CALAIS 








DATA 850,1420,755 
2,6052,1250,615, 1 . 
1165,490,1180,470,: 
5,405 


1500,705, 
,610,1180 
70,1250,455 





COTENTIN + FINISTERE 







170 DATA LESG, 410, 1200, 480 ,1170,430,1110 
1445,1068,5998,1088,270,1070,258,1086,515 
yLO6S LV LAISSES, 1110,2208,1097,145,109 

3 

180 

190 ° FINISTERE — BRETAGNE SUD 

O0 

210 DATA 109,1080,108,1080,145,1088,140, 
1040,130,10406,126,1048,120,10258,120,1020 
LES, 100,150 












HKETAGNE SUD —- VENDEE 

240 

2930 DATA 1020,100,1008,140,988,145,960, 1 
793977931993 960,260,925,322,875,560,870,25 

45,855 

260 

270 ‘ VENDEE -— FYKRENNEES 

280 

290 DATA 270,820,440,728,460,6:5,520,560 
:510,560,450,610,440,490,460,490,455,475 = 
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.440,475,400,220,3568,285,405,270,400,240 
500 


310 FYRENNEES — MEDITERRANEE 





350 DATA 500,200,540, 200,560 , 180 ; 640,180 
,635,200,790,125,820,190,850,120,920,140 
40 

350 ‘ MEDITERRANEE -— COTE D'AZUR 

360 

370 DATA 910,240,1015,309,1080,280,1170, 
260,1220,240,12320,265,13:95,3%43,1420,408 

380 

390 ‘ ITALIE — ALLEMAGNE 

400 

410 DATA 1520,440,1535,900,1295,980,1542% 
1390,1500,680,1700,740,1230,705,1225,754 
11510,880,1310,905,1570,910,1420,1150,14 
05,1175 

420 

450 ‘ LUXEMEOURG - FAS DE CALAIS 

440 

450 DATA 13550,1160,1260,1160,1250,1200,1 
150,1200,1080,1255,1075,135085,1085,1270,1 
010,1270,1008,1320,962,12:20,950,1550,905 
»1590,875,1:80,850,1470 

460 ‘ 

470 EX=640/2000 

480 EY=400/1250 

490 READ X,Y 

300 MOVE XKEX,Y+EY 

510 FOR I=2 TO 10% 

320 READ X,Y 

330 DKRAW XX#EX,YXEY,2 

340 NEXT I 

3930 MOVE 520,200 

360 ‘ 

970 INE E,5 
580 FILL : 


7 
Ca 


3970 

600 GRAFHICS FEN 1 
610 

620 ‘ SEINE 

6:50 


640 DATA 620,1200,660,1200,710,1180,740, 
1180,860,1065,900,980,925,965,950,960,99 
0,970,1020,980,1050,975,1090,920,1100,88 
© 

650 READ X,Y 

660 MOVE X*EX,Y*EY 

670 FOR I=1 TO 12 

680 READ X,Y 
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690 DRAW XKEX,YXEY, 1 
700 NEXT I! 
710: 
720 ‘ LOIRE 
5 ‘ 
740 DATA 360,870,545,860,550,840,600,860 
,650,860,760,910,800,915,850,900,875,870 
,895,800,970,730,980,700,970,670,990,625 
,760,530,975,515,990,525,1000,540 
750 READ X,Y 
760 MOVE X*EX,Y*EY 
770 FOR I=i TO 17 
780 READ X,Y 
790 DRAW XKEX,Y*EY 
800 NEXT I 


810 
820 ‘ RHÜNE 
850 


840 DATA 1230,710,1215,665,1190,660,1180 
16970,11:5,690,1128,640,1140,565,1120,5310 
:1120,380,1100,325,1040,300,1100,%35,112 
5,270 

950 READ X,Y 

860 MOVE X4#EX,Y*EY 

870 FOR Izi TO 12 

680 READ X,Y 

390 DRAW XKEX, YxEY 

900 NEXT I 

9i0 ‘ 

920 ‘ GARKONNE 

GEO 

940 DATA SE28,560,570,470,8#0,460,855,415 
1088,390,720,260,750,515,715,270,670,240 
,640,240,640 200 

90 READ X,Y 

960 MOVE XKEX,YXEY 

970 FOR I=i TO 10 

980 READ X,Y 

990 DRAW XKEX, YKEY 

1000 NEXT I 


GRAPHICS FAFER € 
1 GRAFHICS FEN 1,0 
1040 TAG 


1050 MOVE -65,50 










l n FRINT "Carte de France": 
1070 î 

1080 FAFER © 

i0g0 





1100 C#= à IF Ce" THEN 1100 
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La fonction HIMEM retourne l'adresse de l’octet le plus haut de la 
mémoire disponible sous BASIC. 


FORMAT 


HIMEM 


COMMENTAIRES 


A l'initialisation du système, HIMEM renvoie la valeur 43903 (CPC 
464) ou 42619 (CPC 664). La partie basse de la mémoire (adresse 
0000H à 0040H) étant utilisée par le système, il reste néanmoins près 
de 42 K de mémoire RAM disponible pour l'utilisateur. 16 K supplé- 
mentaires sont réservés à la mémoire écran (mémoire haute, adres- 
ses CO00H à FFFFH). L'instruction MEMORY permet d’abaisser la 
limite de la zone disponible pour le BASIC. Cela est particulièrement 
utile si l’on veut développer des programmes écrits en langage 
machine. 

Il faut également savoir que l'ordinateur abaisse de 4 K la zone 
mémoire utilisable sous BASIC lorsqu'un fichier est ouvert sur cas- 
sette ou sur disquette. On peut s’en convaincre facilement en exé- 
cutant le petit programme suivant (après avoir placé une disquette 
ou une cassette dans le lecteur correspondant) : 


10 H=-HIMEM 
20 OPENOUT ‘essai 
30 PRINT (H-HIMEM)/1024 


La valeur affichée est 4, c’est-à-dire quatre kilo-octets. Cette place 
mémoire est utilisée comme tampon pour le fichier ouvert. 
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IF... THEN...ELSE 
IF...GOTO...ELSE 


Ces instructions constituent des tests conditionnels permettant, selon 
le résultat, de prendre une décision quant au déroulement du 
programme. 


FORMATS 


IF expression <, > THEN clause < ELSE clause > 


IF expression <, > GOTO ligne < <, > ELSE clause > 
Exemples 


IFA>B THEN C=B ELSE P=Q 
IF A$(1)=A$(2) THEN 110 


IFA>B THEN IF B>C THEN PRINT ‘A > C'" ELSE PRINT 
‘B< =C'" ELSE PRINT ‘A < =B” 


RÈGLES DE SYNTAXE 


L'expression est une expression numérique quelconque. Lorsqu'elle 
est vérifiée, la clause THEN ou GOTO est exécutée. La clause THEN 
peut contenir une instruction, une séquence de plusieurs instructions 
(séparées par :) ou un numéro de ligne. GOTO est nécessairement 
suivi d’un numéro de ligne. 

Si l'expression n’est pas vérifiée, la clause THEN (ou GOTO) n'est 
pas prise en considération etla clause ELSE, si elle existe, est exécu- 
tée. Cette clause est facultative. Si elle est omise, l'exécution se pour- 
suit normalement à partir de l'instruction suivante. 


COMMENTAIRES 


Les trois mots IF, THEN et ELSE (ou IF, GOTO et ELSE) ne forment 
qu'une seule instruction. Cela signifie que les clauses THEN et ELSE 
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doivent nécessairement figurer sur la même ligne de programme (défi- 
nie par un numéro) que le mot clé IF auquel elles se rapportent. 
Les instructions IF... THEN...ELSE peuvent être imbriquées, dans la 
limite maximale d'une ligne de programme. La clause ELSE étant facul- 
tative, il peut arriver qu'une ligne d'instructions contienne moins de 
mots ELSE que de mots THEN. Dans ce cas, chaque ELSE se rapporte 
au THEN non apparié le plus proche, en allant vers le début de la 
ligne. Le programme suivant illustre cette règle d'appariement. 


EXEMPLE DE PROGRAMME 


La partie de programme détaillée ici est incluse dans l’algorithme 
de tri donné en illustration de l'instruction MID. 

M mots où expressions ont été entrés au clavier et stockés dans 
les variables de chaînes A$(1). En vue d'établir un classement de ces 
chaînes par ordre alphabétique, on souhaite éliminer dans chacune 
d'elles les blancs, les apostrophes et les tirets. C'est l'objet des ins- 
tructions figurant de la ligne 140 à la ligne 200, telles qu'elles sont 
explicitées ci-dessous. 


Ligne 170 


La valeur de chaque variable A$(1) est passée à la variable C$(1) cor- 
respondante et la valeur ‘’ ”” (caractère blanc) est donnée à la variable 


B$. 


Ligne 180 


La première localisation du caractère blanc est recherchée dans 
la chaîne C$(1). Le numéro correspondant est stocké dans la variable 
numérique N. Si la chaîne C$(1) ne contient pas de blanc, N sera égal 
à 0. 


Ligne 190 


Cette ligne est réécrite ci-dessous en affectant un numéro entre 
parenthèses à chaque mot clé IF, THEN et ELSE. Ces numéros sont 
uniquement destinés à décrire la procédure d'appariement ; ils ne 
doivent en aucun cas être écrits dans le programme. 
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En fonction de la règle d’appariement précédemment énoncée : 


IF(1) est apparié à THEN(1) et ELSE(3) 
IF(2) est apparié à THEN(2) et ELSE(1) 
IF(3) est apparié à THEN(3) et ELSE(2) 


On notera d'autre part que les deuxième et troisième clauses THEN 
contiennent chacune deux instructions (séparées par :). 

Supposons que la variable C$(1) considérée ait pour valeur l'expres- 
sion ‘Programme essai”. Un blanc se trouvant en dixième position 
dans cette expression, l'instruction de la ligne 180 fournira la valeur 
10 à N. L'expression IF(1) n’est donc pas vérifiée, ce qui entraîne l'exé- 
cution de la clause ELSE(3), c'est-à-dire que la chaîne C$(1) est réé- 
crite en supprimant le blanc ; elle devient ‘’Programmeessai”’. 

Lorsque la variable C$(1) testée ne contient ni blanc, nitiret, ni apos- 
trophe, l’ordre d'exécution est le suivant : 


IF(1) vrai - THEN(T) - IF(2) vrai - THEN(2) - IF(1) vrai - 
THEN(1) - IF(2) faux - ELSE(1) - IF(3) vrai - THEN(3) - IF(1) vrai - 
THEN(1) - IF(2) faux - ELSE(1) - IF(3) faux - ELSE(2) 


Ligne 200 


L'expression N > O0 n'est vérifiée que si l’un des trois caractères 
— blanc, apostrophe ou tiret — a été rencontré (et supprimé) dans 
la chaîne C$(1). Dans ce cas, la clause THEN renvoie l'exécution du 
programme à la ligne 180, afin de rechercher une nouvelle occur- 
rence du caractère déjà trouvé et celle des caractères non encore 
testés. Lorsque tous les caractères en question ont été éliminés (ou 
lorsque la chaîne n’en contenait pas à l’origine), N devient égal à 
0, de sorte que la clause ELSE est exécutée, c’est-à-dire que l'ensem- 
ble des opérations est de nouveau effectué sur la chaîne C$(1) sui- 
vante (NEXT 1). 

On trouvera, dans le programme illustrant l'instruction MID$, un 
exemple d'utilisation de l'opérateur logique AND dans une boucle 
IF... THEN. 


“ 
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L'instruction INK permet d'attribuer une où deux couleurs à un 
numéro d'encre donné. 


FORMAT —__ — 
INK numéro d'encre, couleur1 < ,couleur2 > 


° Le numéro d’encre est une valeur comprise entre 0 et 15. 


e couleurt est une valeur comprise entre O0 et 26 ; elle correspond 
à une des couleurs proposées dans la palette Amstrad. 


e couleur? est une valeur comprise entre O et 26 : elle correspond 
à la seconde couleur affichée par intermittence. 


COMMENTAIRES 


En fonction du mode, l’Amstrad permet d'afficher simultanément 
plusieurs couleurs sur l'écran : 


Mode 0 : 16 couleurs parmi 27 
Mode 1 : 4 couleurs parmi 27 
Mode 2 : 2 couleurs parmi 27 


Ces couleurs peuvent être obtenues en mode fixe (le troisième para- 
mètre associé à la commande INK n’est pas précisé) ou en mode cli- 
gnotant (le troisième paramètre associé à la commande INK est 
précisé). 


EXEMPLE DE PROGRAMME 


Le programme suivant illustre l'emploi de l'instruction INK ; trois 
boucles imbriquées (lignes 70 à 230) permettent d'afficher quelques 
lignes de texte et de faire varier simultanément les couleurs du bord 
de l'écran ainsi que celles du fond et des caractères. 
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MODE © 
INE E,0 
INF 
FAFER 2 

FEN 3 

CLS 

FOR 1=0 TO 6 

ORDER I 

FÜR I1i1=0 TO 6 

INE 2,11 

FOR 12=0 TO 6 

IN 3,12 

CLS 

LOCATE 1,6 

PRINT "COUL. BORD : °"315"6" 
LOCATE 1,12 

PRINT "COUL. FOND 
LOCATE 1,18 

FRINT "COUL. STYLO : °"; 
FOR J=i TO 1000 s NEXT J 















Ê 
& 
‘ss 
4 
[es 
“as 
VE: 
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NEXT IE 
NEXT Ii 
NEXT I 


1e 


La fonction INKEY permet de savoir si une touche particulière du cla- 
vier a été frappée. 


FORMAT 
INKEY (numéro de touche) 


° numéro de touche correspond à une touche quelconque du 
clavier ; par exemple, la touche ‘’O’”' porte le numéro 34 et la 
touche ‘’N’’ porte le numéro 46. 


COMMENTAIRES 


La fonction INKEY interroge le clavier 50 fois par seconde (la période 
est de 0,02 seconde) ; il faut lui indiquer le numéro de la touche à 
scruter. Si la touche n’a pas été frappée, la fonction retourne la valeur 
—1 ; si la touche a été frappée, elle retourne la valeur 0. 

Par exemple, l'exécution d’un programme peut être interrompue 
tant que l'utilisateur n’a pas donné de réponse positive, c’est-à-dire 
tapé ‘‘O’’ ou ‘‘o’’. Deux solutions se présentent : regarder si le carac- 
tère tapé est un ‘‘o’’ minuscule ou un ‘O”’ majuscule, ou bien attendre 
que la touche correspondant aux deux caractères soit activée. Les 
lignes suivantes permettent d'interrompre le déroulement du pro- 
gramme tant que la touche n° 34 (‘O0’) n'a pas été frappée : 


50 PRINT “TAPEZ LA TOUCHE O POUR CONTINUER" 
60 WHILE INKEY(34) : WEND 
70 PRINT “SUITE !" 


Le programme boucle sur la ligne 60 tant qu'aucune touche n'est 
frappée (il en est de même si la touche activée n’est pas la touche 
34) ; la fonction retourne la valeur — 1 (qui est une affirmation vraie) 
et la boucle WHILE est exécutée. Lorsque la touche ‘‘O”' est frappée, 
la fonction retourne la valeur 0 (affirmation fausse), la boucle se ter- 
mine et le programme passe à la ligne 70. 
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La fonction INKEY$ lit un caractère frappé au clavier. 


FORMAT 
A$=INKEYS$ 
COMMENTAIRES 


Le caractère frappé au clavier est lu par la fonction INKEY$ au 
moment où celle-ci est exécutée par le programme. Il est stocké dans 
une variable (ici A$) dont la valeur est aussitôt transmise au programme 
sans qu'il y ait ni affichage ni interruption de l'exécution. Un seul 
caractère peut être saisi à la fois par la fonction INKEY$. Lorsque aucun 
caractère n’est frappé au clavier alors que la fonction est exécutée, 
celle-ci retourne une chaîne vide dans la variable de stockage. 


EXEMPLE 


Le programme suivant effectue une boucle sans fin tant qu’une 
touche quelconque n’est pas pressée par l'utilisateur : 


20 PRINT ‘Appuyez sur une touche quelconque pour commencer” 
30 A$= "” 
40 WHILE A$=" ” : A$=INKEYS : WEND 


La structure d'attente aurait pu aussi être écrite de la manière 
suivante : 


20 PRINT ‘Appuyez sur une touche quelconque pour commencer” 
30 A$S=INKEYS : IF A$=" ‘ THEN 30 
La fonction INKEY$ est souvent utilisée dans une telle boucle, afin 


de laisser à l'utilisateur le temps d'appuyer sur une touche. 
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INP et OUT 


La fonction INP retourne la valeur de l’octet lu sur le port d’entrée/sor- 
tie spécifié. La fonction OÙT adresse un octet de donnée sur le port 
d’entrée/sortie spécifié. 


FORMATS 


Y=INP(n° de port d’entrée/sortie) 


OÙT n° de port d’entrée/sortie, m 


° Le numéro de port est un nombre entier compris entre O et 65535. 


e mest une expression numérique entière comprise entre 0 et 255 
qui détermine la valeur spécifiée pour l’octet de donnée. 


COMMENTAIRES 


Les fonctions INP et OUT s’emploient peu en BASIC. Le micropro- 
cesseur Z80 de l’Amstrad utilise en particulier les adresses d’entrée/sor- 
tie inférieures à &7FFFF pour gérer le transfert d'informations entre 
toutes les unités (clavier, écran, unités de disque, unité centrale, etc.). 
L'emploi des fonctions INP et OUT nécessite une connaissance pré- 
cise de la partie matérielle (hardware) de l'ordinateur. 

Signalons, à titre indicatif, que les adresses hexadécimales &F8xx, 
&F9xx, &FAxx et &FBxx sont disponibles pour les utilisateurs. Les carac- 
tères génériques xx peuvent prendre des valeurs comprises entre &DC 
et &DF pour les interfaces de communication et entre &EO et &FE 
pour des périphériques quelconques. 
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AU 


L'instruction INPUT permet d'entrer des données à partir du canal 
spécifié. 


FORMAT 
INPUT < # n° de canal, > < ‘‘’chaîne”’ séparateur > liste de variables 


e Le numéro de canal est un nombre compris entre 0 et 9. 


e Le paramètre optionnel ‘’chaîne’’ est une chaîne de caractères (qui 
doit être écrite entre guillemets) qui est affichée sur l'écran au 
moment où l'instruction INPUT est exécutée. 


e Séparateur peut être une virgule ou un point-virgule ; la virgule 
entraîne seulement l'affichage du message entre guillemets, tandis 
que le point-virgule provoque l'affichage d’un point d'interroga- 
tion après le message. 


e Les éléments de la liste de variables doivent être séparés par une 
virgule. Ces éléments peuvent être des variables de chaîne ou des 
variables numériques. Les valeurs entrées au clavier (ou lues dans 
un fichier) sont affectées aux variables en respectant l’ordre de la 
liste. 


Exemples 


INPUT ‘Valeur donnée à la variable X'';X 
INPUT “Entrer X et Y':X,Y 

INPUT X 

INPUT ‘’Nom,age”,A$,A 

INPUT #1,A$,B$,A,B 


COMMENTAIRES 


Lorsqu'une instruction INPUT est rencontrée au cours de l’exécu- 
tion d’un programme, celle-ci est suspendue en attente d’une entrée 
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de données par le canal spécifié. Si le paramètre optionnel ‘chaîne’ 
est spécifié dans l'instruction, cette chaîne de caractères est affichée 
à l'écran, suivie d’un point d'interrogation. Dans le cas contraire, seul 
un point d'interrogation apparaît à l'écran au moment où l'instruc- 
tion INPUT est exécutée. Les données entrées au clavier doivent être 
séparées par des virgules. L'ordre de leur affectation aux variables 
spécifiées dans l'instruction respecte l’ordre d'entrée (ou de lecture). 
Les valeurs entrées au clavier sont validées par un retour chariot qui 
doit être exécuté une fois que toutes les données de la liste ont été 
fournies. S'il est exécuté avant, le message : 


?Redo from start 


est affiché sur l'écran, signifiant que des données doivent être réin- 
troduites. La liste des variables d’une instruction INPUT (ou INPUT #) 
n’est pas nécessairement homogène. Elle peut contenir des variables 
de types différents (voir exemples 4 et 5). Cependant, les valeurs 
entrées au clavier ou lues dans le fichier doivent correspondre aux 
types de variables auxquelles elles seront affectées. Les valeurs de 
chaîne entrées au clavier n’ont pas besoin d'être écrites entre guille- 
mets, sauf si elles contiennent une virgule ou un espace significatif 
de début ou de fin. 

Pour pouvoir entrer des données à partir d’un fichier (instruction 
INPUT#9), celui-ci doit avoir été au préalable ouvert (voir l’instruc- 
tion OPENIN). 
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La fonction INSTR recherche la première localisation d’une chaîne 
de caractères B$ dans une autre chaîne de caractères A$. Elle renvoie 
une valeur numérique correspondant à la position de B$ dans Af$. 
Un paramètre facultatif, n, permet de commencer la recherche à un 
endroit quelconque à l’intérieur de la chaîne Af. 


FORMAT 
INSTR(< n, > A$,B$) 

e nest une expression numérique entière comprise entre 1 et 255. 
Lorsque la valeur de ce paramètre facultatif n’est pas précisée, la 
valeur 1 est retenue par défaut, c’est-à-dire que la recherche 
commence à partir du premier caractère de Af. 

Exemples 

PRINT INSTR("AEIOUY","U") 

Le résultat est 5. 

PRINT INSTR("Jean-Marc” Marc") 

Le résultat est 6. 

PRINT INSTR(5, "Jean-Marc", "Marc") 
» 

Le résultat est 6 (bien que la recherche commence à partir du 5° carac- 

tère, la valeur retournée correspond à la position dans la chaîne 

entière). 
Pour cette raison, l'instruction : 
PRINT INSTR(5,“Jean-Marc","a") 


retournera la valeur 7, alors que l'instruction : 


— 130 - 


PRINT INSTR("“Jean-Marc”’,‘'a'') 


retournera la valeur 3. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


Lorsque B$ est une chaîne nulle, la fonction INSTR retourne la valeur 
n (ou 1, sin n’a pas été précisée). Lorsque la chaîne A$ ne contient 
pas B$, la fonction INSTR renvoie la valeur 0 ; il en est de même 
lorsque la chaîne A$ est nulle, ou lorsque n > LEN(AS), c'est-à-dire 
lorsque la valeur de n excède le nombre de caractères contenus dans 
la chaîne Af. 

Un message d'erreur ‘‘Improper argument”’, argument incorrect, 
est affiché lorsque n est supérieur à 255. 
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La fonction JOY renvoie l’état du joystick (manette de jeu) spécifié. 


FORMAT 





JOY(n° de joystick) 


° numéro de joystick peut, suivant le périphérique désiré, prendre 
la valeur O0 ou 1. 


COMMENTAIRES 


L'Amstrad scrute le clavier et les joysticks 50 fois par seconde. Il 
existe deux moyens de connaître l’état des manettes de jeu : la 
fonction JOY et la fonction INKEY. 

Le tableau suivant indique les valeurs retournées par les fonctions 
suivant l’état des manettes : 


Position de Fonction INKEY Fonction JOY 
la manette O correspondante correspondante 
Haut INKEY(72) = 0 JOY(O) = 1 
Bas INKEY(73) = O JOY(O) = 2 
Gauche INKEY(74) = 0 JOY(O) = 4 
Droite INKEY(75) = 0 JOY(0) = 8 
Fire 2 INKEY(76) = 0 JOY(0) = 16 
Fire 1 INKEY(77) = O JOY(O) = 32 


Par exemple, un sous-programme testant l’état de la manette de 
jeu n° O peut être écrit des deux manières suivantes : 


50 IF JOY(0)-16 THEN GOSUB 1000 
ou bien : 
50 IF INKEY(76)=0 THEN GOSUB 1000 
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Si le bouton ‘‘fire2’’ du joystick n’est pas activé, la fonction JOY(O) 
renvoie la valeur O, tandis que la fonction INKEY(76) retourne la valeur 
— 1. 
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KEY 


La commande KEY permet de redéfinir les touches de fonction du 
clavier. 


FORMAT 
KEY numéro de la touche,chaîne de caractères 


e Le numéro de la touche doit être compris entre 128 et 159. 


e Chaque chaîne de caractères ne doit pas comporter plus de 32 
caractères et la somme des caractères ajoutés ne doit pas dépasser 
100 caractères. Il peut s'agir d’une constante, d’une variable ou 
d'une expression exprimée sous forme de chaîne de caractères. 
Les expressions telles que les mots clés BASIC doivent être placées 
entre guillemets. 


COMMENTAIRES 


Lors de la redéfinition des touches de fonction, il est possible d’in- 
clure, après la chaîne de caractères, le code d’un retour chariot, soit 
CHR$(13). Si la chaîne correspond à une commande BASIC, celle-ci 
sera alors exécutée dès que la touche de fonction sera pressée. 
Exemples 

KEY 135,"'SAVE ‘’+CHR$(34) 
Lorsque la touche F7 sera pressée, le message : 

SAVE 
s'affichera à l'écran. Il ne serait pas très astucieux d'inclure un retour 
chariot après cette instruction, celle-ci étant généralement utilisée en 


précisant le nom du programme qui doit être sauvegardé. 


SAME 


En revanche, si l’on veut redéfinir la touche F9 de sorte que celle- 
ci exécute la commande NEW (qui ne nécessite aucun argument par- 
ticulier), il suffit de taper : 


KEY 137,"NEW"+CHR$(13) 


EXEMPLE DE PROGRAMME 


Le programme ci-dessous permet de redéfinir des touches du cla- 
vier. À titre d'exemple, les touches fonction f1, f4, f7, f8 et f9 ont été 
reconfigurées pour représenter des lettres accentuées (lignes 50 à 150). 
La seconde partie du programme donne à l'utilisateur la possibilité 
de générer ses propres caractères en complétant une matrice dessi- 
née sur l’écran. Lorsque la saisie est terminée, le programme affiche 
les valeurs décimales correspondant à chacun des huit octets codant 
le caractère. 


10 MODE 1 

2Q BORDER € 

HO INK O,1 2 INF 1,24 2 INE 5,9 2 INE 
mi 

4Q FAFER 0 4 FEN 1 

HO SYMEOL AFTER 150 

60 SYMROL 170,8,16,460,107%,126,96, 460,0 
70 SYMEOL 123,32, 16,120,12%,124,204,118,0 

80 SYMBOL 156,24,76, 60, 10%,126,4 96,60, [a 

90 SYMEOL 1:2369,16,8, 60, 102,126, 96, 60,4 (a) 

100 SYMEOL 151,16,8,107,102,107,102,67,0 

110 KEY 155, CHR$# (178) 

120 ÉEY 1356, CHR# (130) 

170 ÉEY 177, CHR$ (176) 

140 KEY 132, CHR$ (132) 

150 KEY 129,CHR# (151) 

160 CLS 

170 FRINT "Des lettres accentuees ont et 

e affectees": 

180 FRINT'aux touches de fonction #1, +4 

5 FZs F8! 

190 PRINT "et +49," 

200 FRINT 

210 LOCATE 1,25 

220 FRINT "(taper une touche pour contin 

uer !)"s 

240 Cé="" 

240 WHILE C$="" s: CH=INEEYS : WEND 

250 WHILE 1 

280 CLS TT 


— 135 - 


270 FRINT "Deplacer le curseur avec les 

fleches" 

280 FRINT "et modifier la matrice avec d 
es Au s" 

290 FRINT "taper <ENTERE lorsque le cara 
ctere est saisi." 

300 FAFER 2 : FEN 3 

510 WINDOW #1,25,33,16,2%4 

320 WINDOW #2,24,33,15,15 

370 FAPFER #2,23 

340 CLS #2 

550 WINDOW #3,24,33,24,24 

360 FAFER #23,3 

370 CLS #3 

580 WINDOW #4,24,24,16,23 

390 FAFER #4, 

400 CLS #4 

410 WINDOW #S,233,35, 16,235 

420 FAFER #5,3 

430 CLS #5 

425 FEN #1,1 

440 FOR I=1 TO 8 

450 LOCATE 5,1+5 

460 FRINT "£00000000%" 

470 NEXT I 

480 CURSOR 1,1 

490 C$="" 

500 WHILE C$<>:CHRS# (17) 

510 LOCATE 6,6 

S20 WHILE FOS(#0)5%5 AND FOS(#O0)<14 AND V 
FOS(#0)55 AND VFOS(#O)<14 AND C$é:CHRS (1 


3) 


530 C$="" 

540 WHILE C$="" : C=INKEYS : WEND 

550 IF C$="1" OR C$="O" THEN GOSUR 860 : 
PRINT C#: 


560 IF C$=CHR$(240) THEN LOCATE FOS(#O), 
VFOS (#0) —1 
570 IF C$=CHR$(241) THEN LOCATE FOS (#O), 
VFOS (#0) +1 
580 IF C$=CHR$(242) THEN LOCATE FOS (#0)— 
1, VFOS (#0) 
590 IF C$=CHR$(243) THEN LOCATE FOS (#0) + 
1, VFOS (#0) 
600 WEND 
610 WEND 
620 FOR J=1 TO 8 

30 LOCATE ?,15+J 
640 FRINT SPFACES (16); 
650 NEXT J 
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680 FOR J=1 TO 8 
870 LIK$S="" 
680 FOR I1=6 TO 13 
690 LOCATE 1,5+J 
700 LIRS=LIRS+COFYCHRS (HO) 
710 NEXT I 
720 A(J)=VAL ("SX '"'+LIRSE) 
50 LOCATE 3,J+15 
740 FRINT "Rangee";gs:"=":A(J) 
750 NEXT J 
760 LOCATE 24,9 
770 PRINT " --5 5: 
780 SYMEOL 240,A(1),A(2),A(3),A(4),A{(S), 
A(6),A(7),A(8) 
790 FRINT CHR$(240)3" "3 
BOOQ FAFER © : FEN 1! 
810 LOCATE 1,24 
830 C="" 
85Q WHILE C$="" : CH=INEEYS : WEND 
840 WEND 
850 END 
860 X=FOS(#O) : Y=VFOS (#0) 
870 LOCATE #1,X-5, Y-5 
880 IF C#$="1" THEN FRINT #1,CHR$&(149)35 E 
LSE FRINT #1,CHR$(128) 
890 RETURN 
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DAT TL AT 
RLRIR RIRE 
be FÜR 00 00 3 07 
as 
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La commande KEY DEF permet de modifier le caractère produit par 
la frappe d’une touche quelconque. 


FORMAT 


KEY DEF n° de touche, répétition < ,normal < ,avec SHIFT 
< ,avec CTRL> > > 


e Le numéro de touche est une valeur comprise entre 0 et 79 ; elle 
correspond au numéro des touches du clavier et des joysticks. 


e répétition peut prendre les valeurs O ou 1 ; la valeur O place la 
touche en mode non-répétition alors que la valeur 1 l'initialise en 
mode répétition. 


e normal correspond au code ASCII du caractère qui sera affiché 
lorsque la touche sera activée seule. 


e SHIFT correspond au code ASCII du caractère qui apparaîtra 
lorsque la touche sera frappée simultanément avec la touche SHIFT. 


e CTRL correspond au code ASCII du caractère qui sera affiché 
lorsque la touche sera frappée simultanément avec la touche CTRE. 


COMMENTAIRES 


Si les valeurs de codes associées à la commande KEY DEF sont 
comprises entre les nombres 128 et 159, les caractères qui apparais- 
sent sont ceux qui sont définis par les fonctions KEY correspondantes. 

Par exemple, la ligne suivante permet de redéfinir la touche TAB 
en mode répétition : 


KEY DEF 68,1,65,145,176 


La frappe de la touche TAB seule provoque l'affichage du carac- 
tère À, la frappe simultanée des touches TAB et SHIFT n’a aucun effet 
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et la frappe simultanée des touches TAB et CTRL génère la lettre alpha. 
La commande : 


KEY 145,"A ou alpha” 


attribue une valeur au caractère étendu de code 145. Maintenant, 
la frappe des touches TAB et SHIFT entraîne l'affichage : 


A ou alpha 
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LEFTS et RIGHTS 


Les fonctions LEFT$ et RIGHTS extraient des caractères en certaines 
positions d’une chaîne ; LEFT$ fournit les n caractères de gauche, 
tandis que la fonction RIGHTS donne les n caractères de droite de 
la chaîne. 


FORMATS 


LEFT$(a$,n) 
RIGHT$(a$,n) 


°_a$ est une expression chaîne de caractères. 
e nest une expression numérique entière (comprise entre 0 et 255) 
spécifiant le nombre de caractères qui doivent être extraits. 


Exemples 


A$=LEFT$("BASIC AMSTRAD",5) 
B$-RIGHT$("BASIC AMSTRAD",7) 


Dans cet exemple, A$ et B$ prennent respectivement pour valeur 
‘BASIC’ et AMSTRAD”. 


COMMENTAIRES 


Si la valeur de n est supérieure au nombre de caractères de la 
chaîne, celle-ci est fournie en entier. Si n est égal à O, on obtient une 
chaîne nulle (c’est-à-dire de longueur O). 

La fonction MID$ permet d'extraire des caractères situés en n’im- 
porte quelle position d’une chaîne (voir la description de cette 
fonction). 
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EXEMPLE DE PROGRAMME 


Cet exemple constitue la seconde partie du programme donné en 
illustration de l'instruction FOR/NEXT. Après qu'une série de résul- 
tats de rencontres sportives entre quatre équipes a été présentée sous 
la forme d’un tableau à deux entrées, il s’agit d'établir le classement 
de ces quatre équipes en fonction des résultats obtenus. Une équipe 
ayant remporté une rencontre marque deux points, celle qui l’a 
perdue n’en marquant pas. En cas de match nul, chacune des deux 
équipes marque un point. Le classement ci-dessous suppose que les 
résultats ont été entrés dans le format x—y, x et y étant des nombres 
inférieurs à 10. 

Le résultat de la rencontre entre l’équipe A$(1) et l'équipe A$(J) est 
stocké dans la variable B$(1,J). Chaque chaîne de caractères B$(1,J) 
commence par un espace qui a été ajouté au résultat (ligne 70) afin 
de le centrer dans le tableau. Le format d’une chaîne de résultat est 
donc le suivant : +x— y, l’astérisque représentant un espace. La pre- 
mière étape (ligne 290) consiste à supprimer cet espace, ce qui est 
réalisé au moyen de la fonction RIGHT$(B$(1,J),3). 

Il s’agit ensuite de comparer x à y : lorsque x > y, l'équipe A$(1) 
marque deux points, qui sont comptabilisés dans la variable numéri- 
que Al). Lorsque x < y, les deux points sont marqués par l'équipe 
A$() et comptabilisés dans la variable numérique A(]J). En cas de match 
nul, chaque équipe A$(1) et A$(J) marque un point comptabilisé dans 
les variables numériques correspondantes. Pour pouvoir comparer 
ainsi x à y, il faut pouvoir les extraire de la chaîne de résultat B$(1,J). 
La fonction LEFT$(B$(IJ),1) permet d'extraire x et la fonction 
RIGHT$(B$(1,J),1) permet d'extraire y. Ces fonctions renvoient des 
valeurs de chaîne (bien que x et y soient ici des nombres). Lorsque 
l’on écrit x < y et que x et y sont des nombres extraits par les fonc- 
tions LEFT$ et RIGHT$, on compare en fait des chaînes de caractè- 
res. Cette comparaison s'effectue en fonction des codes ASCII (voir 
la fonction MID). Les numéros de code des chiffres étant classés dans 
l’ordre de leur valeur numérique, il est donc indifférent de comparer 
ces chiffres sous forme de chaînes ou sous forme de valeurs 
numériques. 

Une fois que les points de chaque rencontre ont été attribués aux 
différentes équipes (lignes 270 à 320), le classement est établi selon 
la technique de tri dichotomique effectué sur les variables numéri- 
ques Al). Le processus est décrit à propos de l'instruction MID$. 


= AL 


LEN 


La fonction LEN fournit le nombre de caractères contenus dans une 
chaîne spécifiée comme argument. 


FORMAT 
LEN(a$) 


e_a$ est une expression chaîne de caractères. 


COMMENTAIRES 


La fonction LEN fournit une valeur numérique. Tous les caractères 
de la chaîne a$ sont comptés, y compris les espaces éventuels. 


Exemples 


PRINT LEN('BASIC AMSTRAD") 


13 

A$="LEN signifie LENGTH, longueur” 
PRINT LEN(A$) 

29 


(Ces exemples sont exécutables en mode programme ou en mode 
direct). 
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Œ 


L'instruction LET permet d’assigner la valeur d’une expression à une 
variable. Le mot LET est facultatif dans la procédure d’assignation. 


FORMAT 
< LET > variable = expression 


e variable est le nom de la variable ou l'élément du tableau auquel 
une valeur doit être affectée. || peut s'agir d’une variable de chaîne 
ou d’une variable numérique. 


° expression est l'expression (chaîne de caractères ou expression 
numérique) dont la valeur doit être affectée à la variable. 


COMMENTAIRES 


Le type de l’expression (numérique ou chaîne de caractères) doit 
correspondre à celui de la variable. Dans le cas contraire, un mes- 
sage d'erreur ‘Type mismatch”” (non-concordance de type) est affiché. 

Le mot LET est facultatif : le signe égal (=) suffit à affecter la valeur 
d’une expression à une variable. Dans tous les exemples donnés dans 
cet ouvrage, le mot LET est omis dans les procédures d’assignation 
(la syntaxe est ainsi plus proche de celle qui est employée en algèbre). 

Par exemple, dans les trois lignes de programme suivantes : 


50 LET LANGAGES$ = "BASIC" 
60 LET VERS$-"" AMSTRAD 1985” 
70 LET NOM$=LANGAGES +VERS$ 


le mot LET peut chaque fois être supprimé. La valeur ‘’BASIC’’ est 
assignée à la variable de chaîne LANGAGE$. La valeur ‘AMSTRAD 
1985" est assignée à la variable de chaîne VERS$. Il est à noter que 
la valeur en question contient des chiffres. Il s’agit néanmoins d'une 
valeur de chaîne, puisqu'elle est écrite entre guillemets. La somme 
des valeurs des variables LANGAGES et VERSS est ensuite assignée 


2.143 := 


à la troisième variable de chaîne NOM$. Celle-ci prend donc la valeur 
‘BASIC AMSTRAD 1985. 

Contrairement à d'autres BASIC, celui de l’Amstrad permet que le 
nom donné à une variable comporte tout où partie d’un mot clé 
BASIC. Par exemple, VERSIONS est permis bien qu'il contienne le 
mot clé ON. Un nom de variable doit toujours commencer par une 
lettre. 
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LINE INPUT 


Cette instruction permet de donner pour valeur à une variable de 
chaîne une suite de caractères entrés au clavier ou lus dans un fichier. 


FORMATS 


LINE INPUT < #numéro de canal, > <; > 
< message, séparateur > < variable de chaîne > 


° Le numéro de canal doit être compris entre 0 et 9. La valeur par 
défaut est 0 ; elle correspond à une entrée clavier. 


e Le message est un texte (optionnel) qui est affiché à l’écran lorsque 
l'instruction LINE INPUT est exécutée. Si le séparateur est un point- 
virgule, le message est suivi d’un point d'interrogation ; si le sépa- 
rateur est une virgule, le curseur est placé immédiatement après 
le message. 


e variable de chaîne est le nom de la variable à laquelle la valeur 
(c'est-à-dire la suite de caractères) entrée au clavier où lue dans 
un fichier (si le numéro de canal est égal à 9) sera affectée. 


COMMENTAIRES 





Tous les caractères (au maximum 254) entrés au clavier, ou lus dans 
le fichier une fois l'instruction LINE INPÜT exécutée, sont considé- 
rés comme faisant partie de la chaîne, jusqu’à ce qu’un retour chariot 
soit exécuté (dans le cas d’une entrée clavier) où que son code (0D) 
soit rencontré au cours de la lecture dans le fichier. 

Tous les caractères (excepté le retour chariot) étant considérés 
comme faisant partie de la chaîne, les virgules, qui sont reconnues 
comme séparateurs de l'instruction INPUT, ne le sont pas dans le 
cas d’une instruction LINE INPUT. 
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Exemple 


10 DIM A$(12) 

20 FOR 1-1 TO 12 

30 LINE INPUT ‘’Nom,Prénom, Téléphone ”’;A${l) 
NEXT | 


Une fois ce programme lancé, le message : 
Nom,Prénom, Téléphone ? 


est affiché douze fois de suite, chaque réponse entrée au clavier étant 
donnée comme valeur à la variable correspondante. Ces réponses 
peuvent être entrées dans n'importe quel format (avec ou sans vir- 
gule, réponses complètes ou incomplètes, etc.). Après chaque 
réponse, un retour chariot doit être tapé, signifiant à l'ordinateur que 
les caractères entrés depuis le précédent retour chariot constituent 
la chaîne à donner comme valeur à la variable A$(1) en cours. 
Dans le programme illustrant les instructions OPENIN et OPENOUT, 
les lignes 280 à 330 permettent de lire le contenu du fichier d’adres- 
ses ; à chaque réitération de la boucle, la ligne 320 assigne une chaîne 
de caractères à la variable T$(INC%) ; la chaîne de caractères se ter- 
mine lorsqu'un caractère retour chariot (CHR$(13)) est rencontré. 
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La commande LIST affiche à l'écran ou sur l'imprimante la liste (le 
listing) des lignes de programme se trouvant en mémoire centrale de 
l'ordinateur. 


FORMAT 
LIST < ligne1 > < — <ligne2> > <,#N° de canal > 


e lignet est le numéro de la première ligne à afficher. 
e ligne2 est le numéro de la dernière ligne à afficher. 


e Le numéro de canal désigne le canal sur lequel doit être sorti le 
listing. La valeur par défaut est O0, ce qui correspond à la fenêtre 
0 de l'écran. Pour éditer le listing sur l'imprimante, le canal 8 doit 
être sélectionné. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


Après que la commande LIST a été exécutée, l'ordinateur revient 
en mode direct. L'affichage du listing (c'est-à-dire de la liste des lignes 
d'instructions qui composent le programme) peut être interrompu 
à tout moment en appuyant une ou deux fois sur la touche ESC. Dans 
le premier cas, le défilement du listing pourra être repris en appuyant 
sur n'importe quelle touche (excepté ESC). Selon le format utilisé, 
la commande LIST a les effets suivants (les exemples donnés ici pour 
la sortie écran s'appliquent aussi à la sortie imprimante, en sélection- 
nant le canal 8) : 


LIST 

liste tout le programme en mémoire, de la première à la dernière ligne. 
LIST m 

affiche à l'écran la ligne de numéro m. 
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LIST m- 

liste le programme de la ligne m jusqu’à la fin. 
LIST -n 

liste le programme de la première à la ligne n incluse. 
LIST m-n 


liste toutes les lignes du programme en mémoire dont les numéros 
sont compris entre n et m (lignes incluses). 


Le programme donné en illustration de l'instruction WINDOW 


montre comment l’on peut afficher un listing sur une fenêtre parti- 
culière de l'écran. 


id 


LOAD 


L'instruction LOAD charge en mémoire centrale de l'ordinateur un 
programme ou fichier sauvegardé sur cassette ou sur disquette au 
moyen de l'instruction SAVE. 


FORMAT 
LOAD ‘spécification du fichier’ < ,adresse > 


e l'argument ‘’spécification du fichier’’ doit respecter les règles 
décrites à propos de l'instruction SAVE et dans la rubrique ‘‘Com- 
mandes AMSDOS"’. 


e L'option adresse est utilisée avec les fichiers binaires ; elle repré- 
sente l'adresse à partir de laquelle le fichier doit être chargé. Si 
celle-ci n’est pas mentionnée, il est chargé à l’adresse qu'il occu- 
pait lors de sa sauvegarde. 


COMMENTAIRES 


Lorsque le chargement doit s'effectuer à partir d’une cassette et 
que le nom du fichier n’est pas précisé, le premier programme trouvé 
sur la bande magnétique est chargé en mémoire centrale. 

Avant de charger un programme, LOAD ferme tous les fichiers 
ouverts et efface toutes les données et les programmes utilisateur rési- 
dant en mémoire centrale. 

Si le programme a été sauvegardé avec l'option P, il ne peut pas 
être chargé avec la commande LOAD. Il faut utiliser la commande 
RUN. 
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LOCATE 


L'instruction LOCATE positionne le curseur sur l'écran, en mode texte. 


FORMAT 
LOCATE < numéro de canal, > coord x, coord y 


e Le numéro de canal correspond à une fenêtre définie avec l’ins- 
truction WINDOVW ; il peut prendre des valeurs comprises entre 
0 et 7. La valeur par défaut est 0. 


e xet y définissent respectivement les nouvelles coordonnées hori- 
zontale et verticale du curseur ; ces valeurs sont relatives à la fenêtre 
spécifiée. 


COMMENTAIRES 


Les lignes de l'écran sont numérotées de 1 à 25, de haut en bas 
de celui-ci ; de la même façon, les colonnes sont numérotées à partir 
de 1 (position correspondant au bord gauche de l'écran). 

Les fonctions POS et VPOS retournent les numéros de ligne et de 
colonne correspondant à la position courante du curseur. 


EXEMPLE DE PROGRAMME 


Le programme de gestion de carnet d'adresses (instructions OPENIN 
et OPENOUT) utilise l'instruction LOCATE pour présenter l'affichage 
des menus et des fiches à l'écran. 
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LOWERS et UPPERS 


Les fonctions LOWERS et UPPER$ permettent respectivement de 
convertir les lettres d’une chaîne de caractères en minuscules ou en 
majuscules. 


FORMATS 


LOWER$ (chaîne de caractères) 
UPPERS$ (chaîne de caractères) 


e chaîne de caractères est une variable alphanumérique quelconque. 


COMMENTAIRES 


Les instructions suivantes permettent de tester si la lettre ‘O”” est 
tapée en majuscule ou en minuscule : 


50 C$-"" 
60 WHILE C$="" : C$=INKEYS : WEND 
70 IF UPPERS(CS)="0" THEN GOSUB 1000 


La ligne 70 aurait pu également être écrite de la manière suivante : 


70 IF LOWER$(C$)="0" THEN GOSUB 1000 
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MASK Instruction 
(CPC 664 et CPC 6128) 


L'instruction MASK permet de tracer des traits en pointillé suivant 
une trame définie. 


FORMAT 
MASK < expression entière > < état du 1°" point > 


e L'expression entière est un nombre compris entre O et 255. 


e L'état du 1°" point peut prendre les valeurs 0 (tracé) ou 1 (non tracé). 


COMMENTAIRES 


La commande MASK définit l’état des groupes de huit pixels qui 
seront tracés par les instructions DRAW et DRAWR ultérieures ; ce 
modèle correspond à la valeur binaire de l'expression (dans laquelle 
les chiffres 1 représentent des pixels allumés tandis que les chiffres 
0 représentent des pixels devant rester éteints). Par exemple, les ins- 
tructions suivantes allument un point sur deux : 


10 MASK &X10101010,1 
20 MOVE 320,0 
30 DRAW 320,400 


Pour tracer une ligne en trait plein, il faut modifier l'instruction MASK 
de la manière suivante : 


10 MASK &X11111111,1 


EXEMPLE DE PROGRAMME 


Pour visualiser l’effet de la commande MASK , il est possible d'ajouter 
une ligne d'instruction au programme illustrant les commandes DRAW 
et DRAWR : 
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305 MASK &X11001100,0 


Le programme trace maintenant la sinusoïde amortie en pointillé. 
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MEMORY 


L'instruction MEMORY permet de modifier la taille de la mémoire 
RAM utilisable en BASIC. 


FORMAT 
MEMORY adresse 


e L'adresse ne doit pas être supérieure à 43903 (CPC 464) ou 42619 
(CPC 664), valeur maximale imposée à l'initialisation du système. 


COMMENTAIRES 


L'adresse la plus haute utilisable en BASIC peut être connue au 
moyen de la variable HIMEM (voir la description de ce mot clé). Les 
chiffres retournés par cette variable sont inférieurs (de 4K) à ceux qui 
sont donnés ci-dessus en cas d’utilisation d’un fichier tampon. 

Deux raisons principales peuvent justifier l’abaissement de la 
mémoire haute disponible en BASIC : 


e la nécessité de réserver une partie de la mémoire RAM pour y 
implanter des programmes utilisateur écrits en langage machine ; 


e_la possibilité donnée par l’Amstrad de porter de 16 à 32K la mémoire 
écran. Les 16K supplémentaires doivent être soustraits des 42K de 
mémoire RAM normalement accessibles en BASIC. 


Le programme ci-après illustre cette dernière possibilité. 


EXEMPLE DE PROGRAMME 


Ce programme réalise une animation simple en affichant alternati- 
vement à l'écran deux dessins complémentaires stockés dans deux 
blocs différents de la mémoire écran. Il s'agit du dessin d’une roue, 
les deux motifs se superposant avec un léger décalage au niveau des 
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rayons. Ce décalage simule, lorsque l’on passe d’une mémoire à 
l’autre, le mouvement de la roue. 


a CLS:CLG 

10 GOSUR 1000 

“0 ECRANSECKRAN XOK &B0: GOSUR 2000 

20 GOTO 20 

999 

LOC HR EME DE DEOMOME DE DER DE DEN EME DE OXEMEEDEDENEDEEN 
1001 INITIALISATION 

LOU RERO DEN ERERE RE MED DE DEEE MEME DEMEURE EE EEE 
MEMORY 18365 

FOR Je0 TO 100 

READ X 

1040 IF X=-1 THEN 1100 

1050 FOÉE &9000+J, X 

1060 NEXT J 

1070 DATA RE, &CO,8&CD,88,8RC,&CS 

1100 ECRAN=SRCO: GÜSUER 2000 

1110 DERUTæ1s GOSUR 1900 

1180 DATA —1 

LEO ECRANe&4Os:  GOSUR 
1210 DERUTSS: GOSUR 1900 
129% RETURN 

1895 

LED  ROROMOREOMOMOREHE RE DE EME MERE DE DEMO M DE DE NE ME EN EE 
1897 TRACE DES ROUES 

LEE RON REOROME ROM HE RON ROME EME MEME ENORME HE RE EM ER NE HE 
1900 CLG:DEG 
1910 ORIGIN HE 
1920 FOR Jæil TÜ 1e 

! FLOT 1o0kCOS (JT), 1O0kSTN Cd) ,i 
1940 NEXT J 

1950 FOK J=DEBUT TO DERUT+E860 STEF € 
1960 MOVE 0,0 

1970 DABW LG0keCOS GT), LOOKSIN CT) 

1980 NEXT J 

LOS RETURN 
























FRE TURN 


Les instructions des lignes 1020 à 1070 correspondent à l'appel d'un 
sous-programme (en langage machine) du système d'exploitation. Elles 
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permettent de charger la valeur &CO (adresse supérieure de la 
mémoire écran) dans le registre À du microprocesseur et appellent 
le sous-programme du système d'exploitation se trouvant à l'adresse 
&BCO8. Ce sous-programme se charge de positionner la nouvelle 
adresse de la mémoire écran ainsi définie. En langage machine, ces 
instructions s’écriraient : 


3ECO LD A,CO 
CDBCO8  CALL BCO8 
C9 RET 


Rappelons que l'architecture du microprocesseur Z80 nécessite 
d'entrer une valeur stockée sur deux octets en mettant la partie de 
poids faible du nombre dans l’octet d'adresse inférieure (8H doit donc 
être entré avant BCH, ligne 1070). 

Le tracé des roues est effectué au moyen des fonctions SIN et COS. 
La modification de la valeur initiale de la variable DEBUT permet de 
décaler la place des rayons, sur les deux dessins. 
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La commande MERGE permet de fusionner un programme se trou- 
vant sur disque ou sur cassette avec le programme résidant en 
mémoire centrale de l'ordinateur. 


FORMAT 
MERGE ‘spécification du fichier” 


+ Les règles concernant les noms figurant dans l'argument ‘’spécifi- 
cation du fichier’’ sont les mêmes que celles qui sont décrites à 
propos de l'instruction SAVE (voir également la rubrique 
‘Commandes AMSDOS"’). 


COMMENTAIRES 


Le programme se trouvant sur l'unité périphérique (cassette ou dis- 
quette) est fusionné avec le programme résidant en mémoire cen- 
trale de l'ordinateur. Si des lignes portent le même numéro, les ancien- 
nes lignes sont remplacées par les nouvelles. 

Lorsque le nom du fichier se trouvant sur cassette n’est pas pré- 
cisé, le programme en mémoire centrale est fusionné avec le premier 
programme rencontré sur la bande magnétique. 

Lors d’une fusion avec un programme stocké sur disquette, si le 
nom n’est pas spécifié, un message d'erreur est affiché ; il en est de 
même si le programme n'existe pas. 

Si le programme est protégé (sauvegardé avec un paramètre P), il 
ne peut pas être fusionné avec le programme en cours. 

Après exécution de la commande MERGE, BASIC revient en mode 
direct. 
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EXEMPLE a ———— —_—_  _  __ _— 


Supposons que le programme donné en exemple dans la rubrique 
‘Opérateurs logiques’” ait été stocké sous le nom CARTES1 au moyen 
de l'instruction suivante : 


SAVE “CARTES1" 


et que les lignes de programme complémentaires données comme 
illustration de l'instruction ON BREAK aient été stockées sous le nom 
CARTES?2 (ces deux programmes n’ont aucune ligne qui se recouvre). 

Pour fusionner les programmes CARTES1 et CARTES2 en mémoire 
centrale de l'ordinateur, les instructions où commandes suivantes 
devront être exécutées : 


LOAD “CARTES1" 
MERGE "CARTES2" 


Il suffira alors d'exécuter la commande RUN pour lancer les 
programmes fusionnés. 
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Fonction ou instruction MIDS$ 


La fonction MID$ fournit une partie spécifiée d’une chaîne de carac- 
tères. En tant qu'instruction, MID$ remplace tout ou partie d’une 
chaîne par une autre chaîne (ou par une partie d’une autre chaîne). 


FORMATS 


e A$, B$ et C$ sont des chaînes de caractères, 


e net m sont des expressions numériques entières dont les valeurs 
sont comprises entre 1 et 255. 


Fonction 
MID$(A$,n < ,m >) 
Exemples 
MID$("Jean-Pierre”,6) 
Le résultat est ‘‘Pierre’’. 
MID$("Jean-Pierre"”,1,4) 
Le résultat est ‘‘’Jean”’. 
Instruction 
MID$(B$,n < ,m >)=C$ 
Exemple 
B$="Louis 11” 
MID$(B$,7,2)=""14" 
PRINT B$ 
Le résultat est ‘’Louis 14”. 
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RÈGLES DE SYNTAXE ET COMMENTAIRES 


Fonction 


La fonction MID$ extrait de A$ une chaîne de m caractères, à 
compter du nièe caractère à partir de la gauche. Lorsque m est omis 
ou lorsque sa valeur est supérieure au nombre de caractères de A$ 
situés à droite du nième, tous les caractères au-delà du n'ème sont 
fournis. Si m=—0 ou si n est supérieur au nombre de caractères de 
la chaîne A$, la fonction MID$ fournit une chaîne nulle. 


Instruction 


m caractères de la chaîne B$ sont remplacés, à partir de la posi- 
tion n, par un nombre équivalent de caractères appartenant à Cf. 
L'argument m est facultatif. S'il n’est pas fourni, tous les caractères 
de la chaîne C$ sont utilisés. Cependant, que m soit ou non spécifié, 
la longueur de la chaîne B$ n’est pas modifiée après l'opération. Si 
le nombre de caractères à remplacer dans B$ est inférieur au nombre 
de caractères de Cf, c’est-à-dire si m est supérieur à LEN(B$) —n, seuls 
les premiers caractères de C$ sont pris en compte pour le remplace- 
ment. Lorsque la valeur de m ou de n est hors limite, un message 
d'erreur ‘‘Illegal function call’, appel fonction interdit, est affiché. 


EXEMPLE DE PROGRAMME 


Le programme ci-après classe par ordre alphabétique une suite de 
mots ou d'expressions (jusqu’à 100) entrés au clavier et stockés dans 
les variables de chaîne A$(1). Le classement est établi au moyen de 
la technique de tri dichotomique, c’est-à-dire que les éléments (mots 
ou expressions) sont comparés deux à deux jusqu’à épuisement de 
la liste. La comparaison de deux chaînes s'effectue caractère par carac- 
tère, au moyen de l'opérateur relationnel >, le classement étant fonc- 
tion des numéros de code ASCII des caractères comparés (la liste des 
numéros de code ASCII est indiquée en annexe du guide de l'utilisa- 
teur livré avec l’Amstrad). 


Utilisation des opérateurs relationnels sur des chaînes de caractères 


Les opérateurs relationnels comparent deux valeurs qui peuvent 
être soit toutes deux numériques, soit toutes deux des chaînes de 
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caractères. Le résultat de la comparaison est vrai ou faux. Ce résultat 
est habituellement utilisé pour prendre une décision quant au dérou- 
lement du programme (au moyen d’une instruction IF... THEN...ELSE 
par exemple). Les opérateurs relationnels sont les suivants : 


égal 

> inégal 
inférieur à 
supérieur à 

= Ou = < inférieur ou égal à 


VAV ANA 


= ou 


: supérieur ou égal à 


L'utilisation des opérateurs relationnels sur des chaînes de carac- 
tères sera illustrée à propos de l'opérateur <. 

Une chaîne de caractères est inférieure à une autre si elle se place 
alphabétiquement avant celle-ci, en tenant compte des règles 
suivantes : 


e Dès que le code ASCII du n'è"e caractère comparé (en partant de 
la gauche) diffère, la chaîne dont le caractère en question a le code 
le plus bas est considérée comme inférieure ; par exemple, 
‘’Dupont’’ est inférieur à ‘’Durand”’ car ‘“‘p''<‘‘r”’. 


e Si, lors de la comparaison, la fin d’une chaîne est rencontrée, cette 
chaîne est considérée comme inférieure à l’autre ; par exemple, 
‘’Jean’’ est inférieur à ‘‘Jean-Pierre”’. 


e Les blancs, qu’ils soient en début, en milieu ou en fin de chaîne, 
sont significatifs et sont pris en compte, à ce titre, dans le classe- 
ment. En conséquence, une chaîne commençant par un blanc sera 
inférieure à toute autre chaîne commençant par un autre caractère 
(car le caractère ‘’ ”” a le code ASCII le plus bas parmi les caractères 
imprimables, à savoir 32). 


D'autre part, l'examen du tableau des codes ASCII donné en annexe 
du guide l'utilisateur montre que : 


e Le numéro de code ASCII des minuscules est supérieur à celui des 


majuscules correspondantes ; par exemple, ‘’Henri’’ est inférieur 
à ‘’alfred’’ car ‘“‘’H”< ‘a. 
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e Les chiffres sont inférieurs aux lettres. 


e Les minuscules accentuées ont des codes ASCII spécifiques, diffé- 
rents de ceux des majuscules et des minuscules non accentuées 
correspondantes. Cependant, ces caractères ne sont pas prépro- 
grammés sur l’Amstrad. Leur code est fonction de l'emplacement 
choisi par l'utilisateur (voir l'instruction SYMBOL). Aussi 
supposerons-nous ici que les mots ou expressions à classer ne 
contiennent pas de minuscules accentuées. 


Algorithme de tri de chaînes de caractères 


Les considérations précédentes montrent que, pour classer par ordre 
alphabétique un ensemble de mots où d'expressions, il ne suffit pas 
de comparer directement ces chaînes de caractères au moyen des 
opérateurs relationnels. Il est nécessaire d'effectuer au préalable un 
certain nombre d'opérations sur ces chaînes afin que le classement : 


e ne différencie pas les majuscules des minuscules ; 
e ne tienne pas compte des caractères de ponctuation tels que tirets, 
blancs (espacements) où apostrophes ; 


Le programme proposé effectue successivement les cinq opérations 
suivantes : 


1. Entrée des chaînes de caractères au clavier et stockage dans les 
variables A$(1) (ligne 110). Une copie de chacune de ces chaînes 
est ensuite chargée dans les variables C$(1) afin d’être traitée ulté- 
rieurement, tout en conservant dans A$(I) les chaînes originales 
(ligne 170). 


2. Élimination, dans chaque chaîne C$(l), des blancs, des apostro- 
phes et des tirets (lignes 170 à 200). 


3. Conversion des minuscules en majuscules (lignes 250 à 280). 
4. Classement des chaînes C$(1) modifiées (lignes 330 à 350). 


5. Affichage à l'écran des chaînes A$(1), selon le classement établi 
sur les chaînes C$(l) correspondantes. 


La deuxième étape est décrite en tant qu'illustration de l'instruction 
IF... THEN...ELSE. La troisième étape, qui fait appel au mot clé MID$ 
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en tant que fonction et instruction, et la quatrième étape sont expli- 
citées à la suite du listing du programme. 


10 DIM A$(100) ,CH(100) 


20 CLS 

30 ‘ 

AD RER MEDEDENEDEDEDENEDE DE DEDENE DEEE DE EME DE DEEE DEEE DE DEEE NE 
SO ‘ ENTREE DES DONNEES 

ED HEORMEOUNEOMEDEIERE DE DE DE DEN DE DE DE DEN DE DE DE DE DE DE DEEE DE DEEE 


79 FRINT "Combien de mots ou d'expressio 
ns" 

90 INFUT souhaitez-vous classer ":M 

90 CLS 

100 FOR I=i TO M 

110 PRINT "Nom numero "3; I: INPUT A(I) 


120 NEXT I 

150 ‘ 

LAQ RMI DE EME DE DEDE DE DE DE DE DEEE DEEE DE DE DE EEE DEEE NE E NE 

150 ‘ ELIMINATION DES ELANCS, DES 
AFOSTROFHES ET DES TIRETS 

LOQ HRRIEOHMCHOUOHEOUEONEMOREONOHOCHEHEREHEOMOCHEHE DEEE HOMME EDEN NE 


170 FOR I1=i TQ MiICHFCI)=AE(I):EHE=" " 

180 N=INSTR(1,C#(CI) ,B#) 

190 IF N=O THEN IF B#=" " THEN B#="'°" 
GOTO 180 ELSE IF H#="°" THEN B#="-": 
GOTO 180 ELSE 200 ELSE C#(I)=LEFTÉ( 
CHCI)D ,N-1) + MID#(C#(CI) ,N+1) 

200 IF N*O0 THEN 180 ELSE NEXT I 


210 
DRO ROHOHMMOMEOMOHEDOROMHE DE DE DE EH DE DEN DE DE DE DEN DÉ HE DE DE DEN DEEE 
250 ‘ CONVERSION DES MINUSCULES EN 
| MAJUSCULES 
BA ROME HEDEREME DE DE DER HE DEEE DEHEDEHE HE DE DE DEN DEEE DEEE EE 


250 FOR I=i TO M : FOR J=i TO LEN(C#(I)) 

260 V#=MIDS (CECI) ,J,1) 

270 IF Véésæ"a" AND V£s="2" THEN W=ASC( 
VE) 52 2 WE=CHRS(W) : MIDE(CÉECI) ,J)= 


WE 
280 NEXT J,I 
290 
HOO HEROREM DE DE PEN DE DE DE DE DE DE DE DE DE DE DE DE DE DE DE DE DEEE DE DE DE DEN DE 
310 CLASSEMENT DES CHAINES 


RO RENE DEMEURE DE EH DE HE DER DE DE DE DE DEN DE DE DE DE DE DE DEN JE IE NE 
330 FOR I=i TO M-i : FOR J=Il+i TO M 


340 IF CHCI):C#(J) THEN D#=C#(I) : C#(1) 
=C#(J) 3 CH(J)=D$ : DÉ=A(I) : A#(I) 
=A$(J) : A#(J)=D# 
350 NEXT J,I 
360 ‘ = 
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570 RME EN DEN DE DE EME DE DE DEMO DE EME DE DE REED HN EN 


380 ‘ SORTIE DES RESULTATS 
DO EME MEME RENE DEN DE HER ÉD DE DE DE DE DEEE DEEE DER DE NE E 
400 FRINT 


410 FOR I=i TO M : PRINT A#CI) : NEXT I 
420 END 


Conversion des minuscules en majuscules correspondantes 
(lignes 250 à 280) 


Cette partie de programme aurait pu avantageusement faire appel 
à la fonction UPPERS. Celle-ci n’est pas employée ici uniquement 
dans un but didactique, afin d’une part d'illustrer la fonction MID$ 
et de montrer d'autre part au lecteur qu'il est souvent relativement 
simple d'écrire quelques lignes de programme destinées à remplacer 
une instruction n’existant pas dans le langage employé. Les fonctions 
UPPER$ et LOWERS sont par exemple relativement spécifiques au 
BASIC Amstrad (elles existent en revanche dans d’autres langages 
évolués tels que Pascal où C). 


Ligne 260 


MID$ est utilisé ici comme fonction ; elle fournit à la variable v$ 
le Jième caractère, à partir de la gauche, de la chaîne C$(1). 


Ligne 270 


L'expression qui suit IF dans l'instruction IF... THEN est un exemple 
d'utilisation de l'opérateur logique AND dans une décision : l’expres- 
sion est vraie (et la clause THEN est alors exécutée) si les deux con- 
ditions suivantes sont simultanément réalisées : 


e V$> =''a", c'est-à-dire que le code ASCII du caractère contenu 
dans la variable v$ est supérieur ou égal à celui de la lettre minus- 
cule a, soit 097. 


e VS < = "2", c'est-à-dire que le code ASCII du caractère contenu 
dans la variable v$ est inférieur ou égal à celui de la lettre minus- 
cule z, soit 122. 


L'expression est donc vraie si le code ASCII du caractère contenu 
dans la variable v$ est compris entre 97 et 122, c'est-à-dire s’il s’agit 
d'une lettre minuscule (non accentuée). Dans ce cas (et seulement 
dans ce cas), les trois instructions de la clause THEN sont exécutées : 
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W=ASCIv$)-32 


La valeur 32 est soustraite de celle du numéro de code ASCII cor- 
respondant à la minuscule contenue dans vf, et le résultat est stocké 
dans la variable numérique W. La valeur 32 représente la différence 
des numéros de code ASCII d’une minuscule non accentuée et de 
la majuscule correspondante (voir le tableau des codes ASCII dans 
le guide de l'utilisateur). La variable W contient ainsi le numéro de 
code ASCII de la majuscule correspondant à la minuscule contenue 
dans v$. 


W$=CHR$(W) 


Le caractère ayant W comme numéro de code ASCII, est stocké 
dans la variable de chaîne W$. Cette dernière contient donc la lettre 
majuscule correspondant à la minuscule contenue dans v$. 


MID$IC$(N,J)=W$ 


MIDS$ est utilisé ici comme instruction. Le Jième caractère de C$(1), 
à partir de la gauche, est remplacé par le premier (et ici unique) 
caractère contenu dans la variable W$. Cette opération a donc pour 
effet de remplacer la minuscule en J'è"e position dans la chaîne C$(1) 
par la majuscule correspondante. 


Lignes 250 à 280 


Deux boucles FOR/NEXT permettent de répéter la suite d'instruc- 
tions des lignes 260 et 270 pour chacun des caractères (du premier, 
J=1, au dernier, J=LENCS$(1)) de chacune des chaînes C$(1) (de 1=1 
jusqu’à 1I=M, M étant le nombre total de mots ou d'expressions à 
classer). 


Classement des chaînes modifiées C${l) (lignes 330 à 350) 


Les deux boucles FOR/NEXT imbriquées permettent de comparer 
la chaîne C$(1) avec la chaîne C$(2), puis avec la chaîne C$(3), etc. 
jusqu’à la dernière chaîne C$(M). Lors de chaque comparaison, la 
variable D$ est utilisée comme variable intermédiaire. Les chaînes 
let J sont interverties lorsque la chaîne d'indice | est supérieure à 
la chaîne d'indice J. Les chaînes correspondantes non modifiées A$(1) 
sont interverties de la même manière. 
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MID$ est également utilisé comme fonction dans l'opération de 
concaténation de la dernière clause ELSE de la ligne 190. Les chaînes 
C$(1), telles qu’elles ont été modifiées pour établir le classement, peu- 
vent également être affichées en regard des chaînes A$(1) correspon- 
dantes, en remplaçant, à la ligne 410, l'instruction PRINT A$(1) par 
l'instruction PRINT A$(1,C$(1). 
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Opérateur arithmétique ET 


LA r x 
L'opérateur MOD (modulo) donne la valeur entière du reste de la 
division d’un nombre entier par un autre nombre entier. 


FORMAT 
n MOD m 
e net m sont des expressions numériques que le BASIC AMSTRAD 


convertit au besoin en nombres entiers avant d'effectuer l’opéra- 
tion (arrondissant à la valeur entière la plus proche). 


COMMENTAIRES 
MOD est un opérateur arithmétique, au même titre que les opéra- 
teurs d’addition, de multiplication, etc. Le modulo se place, dans la 


hiérarchie des opérations arithmétiques, entre l’addition et la sous- 
traction d’une part, et la multiplication et la division d'autre part. 


EXEMPLES 
PRINT 5 MOD 3 

Le résultat est 2. 
PRINT 5.99 MOD 3.1 


Le résultat est O parce que 5.99 est arrondi à 6 et 3.1 à 3. 
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MODE 


L'instruction MODE permet d’initialiser l'écran dans le mode spécifié. 


FORMAT 
MODE n° de mode 


e Le numéro de mode peut prendre les valeurs 0, 1 ou 2. 


COMMENTAIRES 


Après exécution de l'instruction MODE, l'écran est effacé (dans la 
couleur de l'encre n° 0) et les curseurs graphique et texte sont placés 
à leur position d'origine. Les définitions des fenêtres (instruction 
WINDOW) sont d'autre part perdues. 

Les caractéristiques de chaque mode sont énumérées dans les 
tableaux suivants : 


Nb caractères Nb lignes Nb couleurs utilisables 
par ligne par page simultanément 


Résolution graphique Taille d’un pixel graphique 


160 + 200 


320 x 200 


640 x 200 
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MOVE et MOVER 


Les instructions MOVE et MOVER placent le curseur graphique à un 
endroit spécifié de l'écran. L'instruction MOVE est associée à des coor- 
données absolues tandis que l'instruction MOVER est associée à des 
coordonnées relatives. 


FORMATS 


MOVE coordonnée x, coordonnée y<,<n° d'encre > 
< mode d'encre > 


MOVER déplacement x, déplacement y <,<n° d'encre > 
< mode d'encre > 


e Le numéro d'encre est un paramètre qui n'existe pas sur le 
CPC 464. Il peut prendre des valeurs comprises entre 0 et 15 et 
spécifie la couleur de l’encre choisie. 


° Le mode d’encre est un paramètre qui n'existe pas sur le CPC 464. 
Sur les autres modèles, il peut prendre les valeurs 0, 1, 2, 3 ou 4 
suivant le mode d'interaction avec les couleurs de l'écran 
graphique. 


COMMENTAIRES 


Sur les modèles CPC 664 et 6128, il est possible de réaliser une 
opération logique entre le numéro de code de la couleur dans laquelle 
est affiché le point avant exécution de l'instruction MOVE ou MOVER, 
et le numéro de code de couleur correspondant au paramètre ‘’n° 
d’encre’’ de cette instruction (voir les instructions DRAW et DRAWR 
pour de plus amples explications concernant le mécanisme de ces 
opérations logiques). Ces opérations sont les suivantes : 
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Normal 
OÙ exclusif (XOR) 
ET (AND) 

OÙ (OR) 








EXEMPLE DE PROGRAMME 


L'exemple de programme des commandes DRAW et DRAWR utilise 
des instructions MOVE et MOVER pour positionner le curseur gra- 
phique avant chaque groupe d'instructions DRAW où DRAWR. 

Dans le programme illustrant les instructions SYMBOL et SYMBOL 
AFTER, la commande de la ligne 400 génère un déplacement du cur- 
seur graphique de 2 pixels vers la droite à chaque itération de la boucle 
FOR : 

400 MOVE X2,Y1,2,1 


Le troisième paramètre, 2, définit l'encre n° 2 pour le stylo graphi- 
que (c’est-à-dire la couleur turquoise vif, n° 20, qui a été initialisée 
ligne 180). 

Le quatrième paramètre, 1, n’est utilisable que sur les modèles 
CPC 664 et 6128 ; il définit le mode d'encre correspondant à l’opé- 
rateur logique XOR (OÙ exclusif). L'ancienne couleur de chaque point 
tracé est combinée avec la nouvelle suivant l’opération spécifiée (XOR 
dans ce cas) ; cela permet de faire passer la voiture derrière les blocs 
jaunes et de la faire apparaître dans la couleur du fond lorsqu'elle 
chevauche les blocs turquoise. 

L'initialisation du mode d'encre n'existe pas sur les modèles 
CPC 464 ; il est nécessaire d’ajouter la ligne suivante pour obtenir 
un effet similaire : 


365 PRINT CHR$(23)+CHR$(X) 


X pouvant avoir une valeur comprise entre 0 et 3, selon l'opération 
choisie. 
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NEW 


La commande NEW efface de la mémoire centrale de l'ordinateur 
tous les programmes et toutes les données qui s'y trouvent. 


FORMAT 


NEW 


COMMENTAIRES 


Cette commande est généralement utilisée pour libérer la mémoire 
avant l'entrée d’un nouveau programme. Après son exécution, le 
système revient en mode direct mais l'écran n’est pas effacé. La com- 
mande NEW provoque la fermeture de tous les fichiers et positionne 
le mode Trace sur OFF (voir TRON/TROFF). 

La réinitialisation complète du système peut être obtenue en 
appuyant simultanément sur les trois touches CTRL, SHIFT et ESC. 
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Instructions 


ON...GOSUB et ON...GOTO 


Les instructions ON... GOSUB et ON...GOTO provoquent le bran- 
chement du programme principal à un sous-programme 
(ON...GOSUB) ou à une autre partie du programme (ON...GOTO). 
La destination du branchement dépend de la valeur de l'expression 


spécifiée par ON et des numéros de lignes figurant après GOSUB ou 
GOTO. 


FORMATS 


ON expression numérique GOTO liste de numéros de lignes 


ON expression numérique GOSUB liste de numéros de lignes 


e L'expression numérique est automatiquement arrondie en valeur 
entière. Ce nombre doit être compris entre O et 255. Si ces limites 
ne sont pas respectées, le message d'erreur ‘‘Illegal Function Call”, 
appel incorrect de fonction, est affiché. 


e La liste des numéros de lignes correspond aux lignes d'instructions 
où doit s'effectuer le branchement, en fonction de la valeur de l’ex- 
pression numérique. Les numéros de lignes doivent être séparés 
par des virgules, dans la liste. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


Lorsque l'expression numérique est égale à 1, le branchement est 
effectué au premier numéro de ligne de la liste écrite après GOTO 
ou GOSUB. Quand elle est égale à 2, le deuxième numéro de la liste 
est choisi pour le branchement (troisième numéro de la liste quand 
l'expression est égale à 3, etc.). 

Lorsque l'expression numérique est égale à 0 ou lorsqu'elle est supé- 
rieure au nombre de numéros de lignes contenus dans la liste (tout 
en étant inférieure à 256), l'instruction ON... GOSUB ou ON...GOTO 
est ignorée et l'exécution normale du programme se poursuit. 

Dans l'instruction ON...GOSUB, les numéros de lignes de la liste 
doivent correspondre au premier numéro de ligne d’un sous- 
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programme. Ceux-ci doivent se terminer par une instruction RETURN 
qui, lorsqu'elle est rencontrée, renvoie à l'exécution de l'instruction 
suivant ON...GOSUB dans le programme principal. 


EXEMPLE DE PROGRAMME 


Le programme ci-dessous affiche à l'écran quelques formules géo- 
métriques usuelles. 

Selon la réponse fournie à la question posée à la ligne 10, la variable 
W prend la valeur 1,2 ou 3. 

Il en résulte qu’à la ligne 20, le programme est dirigé vers les sous- 
programmes commençant aux lignes 100, 200 ou 300, selon le cas. 
Chaque sous-programme (ici très simple) se termine par une instruc- 
tion RETURN, qui renvoie donc à la ligne 25. 

A la ligne 40, le programme est redirigé soit vers la ligne 10, soit 
vers la ligne 50 (fin du programme). 


10 INFUT "VOULEZ-VOUS LA FORMULE DONNANT 
LE FERIMETRE D'UN CERCLE (1), SA SURFAC 
E (2) OÙ LE VOLUME D'UNE SFHERE CI)": W 
15 CLS 

20 ON W GOSUR 100,200,2700 
23 PRINT 

50 INPUT "UNE AUTRE FORMULE (OUI=1,NON=? 
"52 

55 FRINT 
40 ON Z GOTO 10,50 

50 END 

100 FRINT "PERIMETRE D'UN CERCLE DE KAYO 
N KR :" 

110 FRINT "EE x 3,14 x K" 

20 RETURN 

200 FRINT "SURFACE D'UN CERCLE DE RAYON 
F son 

210 FRINT "E,14 x K X K'" 

220 RETURN 

300 FRINT "VOLUME D'UNE SFHERE DE RAYON 
fr 15! 

F0 FRINT "5,14 x KR x KR x K x 4/3" 

520 RETURN 
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ON BREAK CONT, 
ON BREAK GOSUB 


et ON BREAK STOP 





L'instruction ON BREAK CONT, qui n'existe que sur les modèles CPC 
664 et 6128, ignore les interruptions générées par la double frappe 
de la touche ESC et permet au programme de se dérouler 
normalement. 

L'instruction ON BREAK GOSUB entraîne le déroutement du pro- 
gramme vers un sous-programme en cas de double frappe de la touche 
ESC par l'utilisateur. 

L'instruction ON BREAK STOP annule dans un programme le 
résultat des deux instructions précédentes. 


FORMATS 


ON BREAK CONT 
ON BREAK GOSUB numéro de ligne 
ON BREAK STOP 


COMMENTAIRES 


Il est possible, à tout moment, d'interrompre au clavier l’exécu- 
tion d’un programme en appuyant deux fois sur la touche ESC. Si 
aucune instruction ON BREAK CONT (disponible uniquement sur les 
modèles CPC 664 et 6128) ou ON BREAK GOSUB n'existe dans le 
programme, l'ordinateur revient alors en mode direct. Dans le cas 
contraire, deux situations peuvent se présenter : 


e L'’instruction ON BREAK CONT désactive l'effet de la touche ESC. 


e L'instruction ON BREAK GOSUB entraîne le branchement spéci- 
fié par le numéro de ligne suivant GOSUB. 
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EXEMPLE DE PROGRAMME 


Les cinq lignes de programme suivantes complètent le programme 
de jeu donné en illustration de la rubrique ‘Opérateurs logiques”. 
Dans sa version originale, le programme génère une suite de nombres 
aléatoires (ou plus exactement pseudo-aléatoires) grâce à la fonction 
RND(1). La suite de nombres est donc toujours la même, chaque fois 
que le programme est réinitialisé. L'amélioration proposée ici permet 
d'initialiser la liste d’une manière qui ne dépende pas d’un choix 
objectif du joueur. 


5 CLS 
10 PRINT “Taper 2 fois ESC pour commencer à jouer” 
15 ON BREAK GOSUB 500 
55 IF Z=1 THEN 60 ELSE 50 
500 Z=1 : RETURN 


Ces lignes peuvent soit être ajoutées directement au programme 
précité, soit être sauvegardées indépendamment sous un nom de pro- 
gramme spécifique qu'il suffira de fusionner avec le programme prin- 
cipal, au moment de l'exécution (la procédure est expliquée en illus- 
tration de la commande MERGE). 

Ces quelques lignes de programme permettent de faire défiler la 
liste de nombres pseudo-aléatoires, la carte finalement choisie étant 
fonction du délai entre le moment où le message de la ligne 10 est 
affiché à l’écran et celui où le joueur frappe effectivement la touche 
ESC deux fois. Il suffit d’un écart de quelques fractions de seconde 
pour que la carte choisie soit différente. Une procédure semblable 
pourrait être utilisée avec la fonction TIME. 

Tant que le joueur n’a pas pressé deux fois la touche ESC, de nou- 
veaux nombres X1 et Y1 sont générés (car Z=0, valeur par défaut, 
la ligne 55 renvoyant dans ce cas l'exécution à la ligne 50). Lorsque 
le joueur génère une interruption, le programme est dérouté vers la 
ligne 500 où la valeur 1 est simplement donnée à la variable Z. Au 
retour du sous-programme, lorsque la ligne 55 est de nouveau exé- 
cutée, Z a cette fois la valeur 1, de sorte que le déroulement normal 
du programme à partir de la ligne 60 peut maintenant commencer. 
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OPENIN et OPENOUT 


Les instructions OPENIN et OPENOUT ouvrent respectivement le 
fichier spécifié en lecture ou en écriture. 


FORMATS 


OPENIN nom de fichier 
OPENOUT nom de fichier 


e Le nom de fichier est un paramètre caractérisant le fichier (huit 
caractères au maximum, voir la rubrique ‘Commandes AMSDOS"'). 


COMMENTAIRES 


Le terme fichier désigne indifféremment un programme ou un 
ensemble de valeurs (fichier de données). En BASIC Amstrad, il n'existe 
qu'un type de fichier, le type séquentiel. L’instruction OPENIN n'est 
utilisable que pour ouvrir un fichier ASCII (et non un fichier binaire). 

Un fichier séquentiel stocke les informations les unes à la suite des 
autres, au fur et à mesure qu’elles lui sont adressées. Les données 
nouvelles sont ajoutées à la suite de celles qui existent déjà. Il n’est 
possible ni de modifier une donnée intermédiaire du fichier, ni d’ac- 
céder directement à celle-ci sans parcourir l’ensemble du fichier. 1| 
existe un repère de fin de fichier (CRTL Z) de code ASCII 26 (1A en 
hexadécimal) qui, lorsqu'il est écrit, interdit l'accès à toute donnée 
du fichier qui se trouverait après ce repère. 

Les données ne sont pas transférées une par une du fichier vers 
l'unité périphérique ou vice versa. Le transfert s'effectue par blocs, 
un bloc représentant le contenu de la zone de la mémoire centrale 
spécialement réservée au fichier (mémoire tampon). Ce n’est que 
lorsque cette mémoire tampon est remplie que s'effectue le transfert 
(ou lorsque le fichier est fermé au moyen d’une instruction 
CLOSEOUT, dans le cas d'un accès en mode écriture). 
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EXEMPLE 


Le programme ci-après illustre les instructions relatives aux mani- 
pulations de fichier : il crée un fichier d'adresses et donne à l’utilisa- 
teur la possibilité de le modifier ou de consulter les fiches. 

Les lignes 10 à 240 initialisent l'écran et proposent un choix dans 
un menu : 


e lecture d’une fiche, 
e_initialisation de fiche, 
e fin du traitement. 


Les deux premières propositions entraînent la lecture du fichier sur 
cassette ou sur disquette (lignes 280 à 340). La ligne 280 ouvre le fichier 
‘AGENDA en lecture puis, tant que la fin du fichier n’est pas atteinte, 
chaque ligne de données lue est assignée à la variable T$(INC%). L'ap- 
parition du caractère de fin de fichier, CHR$(26), interrompt la boucle 
WHILE...WEND et la ligne 340 referme le fichier. Lors de la première 
exécution du programme, le fichier ‘AGENDA’ n'existe pas ; pour 
éviter qu'une erreur de lecture se produise, il faut exécuter un petit 
programme qui crée le fichier ‘‘AGENDA' : 


10 OPENOUT "AGENDA" 
20 PRINT #9, CHR$(26): 
30 CLOSEOUT 


Ce programme ne devra plus être exécuté par la suite sous peine 
d'effacer irrémédiablement le fichier de données. 

Le premier choix du menu propose à l'utilisateur d'entrer un nom 
puis, s’il correspond à une fiche, les données correspondantes sont 
affichées. 

Le second choix permet d'entrer des noms et des adresses sur des 
fiches ; les données de chaque fiche sont concaténées dans une chaîne 
de caractères T$(INC%). Lorsque la saisie est terminée (lignes 1260 
à 1300), toutes les fiches de l’agenda qui étaient stockées dans le 
tableau T$( sont écrites dans le fichier (lignes 1310 à 1350) ; puis le 
programme revient au menu. 


10 BORDER 4 

20 INK O,1: INK 1,245 INK 2,0: INK 3,16 

60 PAPER O:FEN 1 

80 DIM T#(100) es 
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90 BL#=SPFACES (35) 


100 
110 
120 
150 
140 
150 
160 
179 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
500 





CLS 
LOCATE 8,3 
PRINT "£ FICHIER D'ADRESSES :" 


LOCATE 2,10 

PRINT "Lecture d'une fiche (1)" 
LOCATE 2,12 

PRINT "Initialisation de fiches (2)" 
LOCATE 2,14 

FRINT "Fin de traitement C3)" 
LOCATE 2,21 

FRINT "Taper le nombre correspondant" 
LOCATE 2,22 

PRINT "au traitement desire "; 

C+= “un 


WHILE C#="" 3: C#=INEEY# s: WEND 
C=VAL (C#) 
IF C3 OR C1 THEN 250 


IF C=5 THEN 3570 
OFENIN "AGENDA" 
INCX=0 
WHILE NOT E0OF 
INCYX=INCZ+1 
LINE INFUT #9,T#ÆCINC#) 
WEND 
CLOSEIN 
ON C GOSUR 410,510 
GOTO 100 
CLS 
LOCATE 10,17 
FRINT "Acces au fichier termine !" 
END 
Lecture d'une fiche 
CLS 
LOCATE 35,5 
FRINT "Nom de la personne recherchee :" 
LOCATE 5,7 2: INFUT NO# 
FOR lA=1i TO INCX 
NOMS=LEFTS (TE CI) , LEN (NO#) ) 
IF NOM#S=NO# THEN GOSUR 1450 
NEXT IX 
RETURN 


PMEDE DE DER DE DE DE DE DE DE DE DE DE DEEE DE DE DE DE RE RE DE MERE DE DE DER DEN 
Initialisation d'une fiche 

PEER DE DE DE DEEE DEEE DE DE DEEE EME DEEE DE DEEE ME XE DE 

INCZS=INC ZA +1 

CLS 

LOCATE %,1 

LOCATE 2,5 


FRINT "Nom 3" 
FRINT "Frenom :" 
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560 
ES N1e) 
SEQ 
40 
TOY) 
660 
890 
700 
710 
720 
740 
7530 
780 
770 
780 
790 
800 





970 
980 


990 

1000 
1020 
1050 
1040 
1050 
1070 
1080 
1090 
1100 
1120 
11350 
1140 
1150 
1170 
1180 
1190 


LOCATE 2,9 : FRINT "Adresse :" 
LOCATE 3,15 : FRINT "Ville :" 
LOCATE 25,1% : FRINT "Code Fostal 
LOCATE 2,17 : FRINT "Tel dom. :" 
LOCATÉE 20,17 : PRINT "Tel trav. :" 


LOCATE 1,24 
FRINT 


FRINT "rubrique. 
FAFER 2 

FEN 

LOCATÉE 7,23: PRINT 


LOCATE 10,7 
PRINT " 
LOCATE 2,11 
PRINT ": 
LOCATE 2,15 
PRINT " 
LOCATE 
FRINT 
LOCATE 2,19 
PRINT 
LOCATE 20,19 
PRINT 
LOCATE 8,3 
TH CINCYH)="" 
INEUT "", NOM 
CHÉ=NOME 2 
GOSUR 1:80 
LOCATE 11,7 
INPUT "",PRENS# 
CHY=PRENSE 
GOSUR 1380 


DIE 


29,19 
’ 


LOCATE 3,11 


INPUT, ADR 
CH#=ADRE 
GOSUR 1380 
LOCATE 3,15 
INPUT M" ,VILE# 
CH#=VILE 
GOSUB 1380 
LOCATE 26,15 
INFUT ‘"",CODE# 
CHF=CODE# 
GOSUB 1:80 
LOCATE 5,19 
INPUT "",TELD# 
CH#=TELDÉ 
GOSUE 1380 

LOCATE 21,19 
INFUT “",TELT# 


+ 
KT 


£ Us SFACE# (15) 
is SPACE (35) à 
"3 SFACES (EU) 


AU s SPACE (5) 3 


Les virgules sont 
Wu CS 


LONG A=E0 


LONGZ= 15 


LONGYZ=LS 


LONGZ=E20 


LÜONGZ£=S 


LONGZ= 1 1 
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,SFACES# (20) 5" 


"Taper <ENTER* à la fin de chaque" 


interdites," 


1200 
1220 


ait 


1250 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1350 
1540 
1350 
1560 
1370 
15:78 
1579 
1380 
LE81 
1390 
1400 
1410 
1420 
1428 
1429 
1450 
1451 
1440 
1450 
1470 
1480 
1490 
1500 
1510 
1520 
15350 
1540 
1350 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1650 
1640 
1650 
1860 


CH#=TELTS : LONGZ=II 
GOSUR 1:80 
FAFER ©Q 3 FEN 1 


CLS 

FRINT "Une autre (QO/N) 7" 

C£= LR LI 

WHILE Cét="" s CH=INEEYS# : WEND 


IF C+#:5:"0" AND C2 "N" THEN 1270 
IF C#$="0" THEN S10 

OFENQOUT "AGENDA" 

FOR J4=1i TO INCX 

FRINT #9,T#(J%) 

NEXT J% 

CLOSEOUT 

CLS 

RETURN 


PE DEDE DEN MODE DE DE DE DEMEURE DE DE DE DE DE DER DEEE DEEE EX 
Ecriture d'une fiche dans une chaine 

LED DEN DE MEME DE DEDE DE DEN DE DEDE DEEE DE DER HE DE DEN DEN JE 

CHE=CHÉE+ELE 

CHE=LEFTE (CHE, LONG) 

TÉ£ (INC) =T# (INC) +CH# 

RETURN 


PMR HE DE HD DE DE DE DE DEN DE DE HENE HE DEEE DENON DE DEEE 
Affichage d'une fiche 
PME DEHE DE DE DE DE DER DE DE DE DE HE DE DE DE DE DE DD DEDE HE DEDE DEEE 


CLS 

FAFER 2 : PEN 3 

LOCATE 8,3 

PRINT !"« FICHE --; #1" 


LOCATE 21,3 

PRINT 1%; 

LOCATE 2,8 

PRINT LEFT#(T#(IZ4) ,20) 

LOCATE 2,10 

PRINT MIDE(CTH(IY) ,21,15) 

LOCATE %,12 

PRINT MID#(T#(I4) ,36,35) 

LOCATE 2,14 

PRINT MID#(T#(IZ),91,5) 

LOCATE 17,14 

PRINT MID#(T#(IZ),71,20) 

LOCATE 2,16 

PRINT "Tel dom. ":MIDÉ#(TÉ(IZ),96,11) 
LOCATE 2,18 

PRINT "Tel trav. "3RIGHTE(T#CIX),11) 
FAFER 0 

PEN 1 
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1670 
1680 
1690 
1700 
1710 





LOCATE 1,25 

PRINT "Taper une touche pour continuer "35 
CE= ait 

WHILE C#="" s CH=INKEYS : WEND 

RETURN 
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(NOT, AND, OR, XOR) 


Ces opérateurs effectuent des opérations logiques (ou booléennes) 
sur des valeurs numériques. Ils sont généralement utilisés dans un 
programme pour coupler deux relations (ou plus) en renvoyant une 
valeur vraie ou fausse qui détermine la suite de l’exécution du pro- 
gramme. Le résultat de l’opération est un nombre qui est faux s’il 
est égal à O ou vrai s’il est égal à une autre valeur. 

Les opérateurs logiques sont les suivants, par ordre de préséance 
lors de l'exécution (l'opérateur NOT n'existe pas sur le CPC 464) : 


NOT (complément logique) 
AND (conjonction) 

OR (disjonction) 
XOR (ou exclusif) 


Ils renvoient les résultats suivants (en fonction des valeurs de X et Y) : 


NOT X X AND Y X OR Y X XOR Y 





Par exemple (3° ligne), lorsque X est faux, NOT X est vrai. Y étant 
vrai, une seule des deux valeurs X et Y est vraie, donc les opérations 
X OR Y et X XOR Y sont toutes deux vraies. Comme X et Ÿ ne sont 
pas simultanément vrais, le résultat de l'opération X AND Y est faux. 
Dans l'instruction IF... THEN...ELSE suivante : 


60 IF À < 50 AND À > 10 THEN PRINT ‘10 < À < 50” ELSE 100 


le résultat de l'expression IF est vrai si À est compris entre 10 et 50. 
Dans ce cas, la clause THEN est exécutée. Dans le cas contraire, la 
clause ELSE renvoie le programme à la ligne 100. 

Les opérations logiques sont effectuées après les tests relationnels 
(<, >, =, etc.) et les opérations numériques. L'ordre de préséance 
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des opérations peut toutefois être modifié en utilisant des parenthèses. 
Les opérations figurant à l’intérieur de parenthèses sont toujours 
effectuées les premières, l’ordre de préséance habituel demeurant 
respecté à l’intérieur de ces parenthèses. 
Afin de se familiariser avec les opérateurs logiques, on pourra vérifier 
que : 
IF A THEN X=(A AND B) ELSE X=-(A OR B) 


est équivalent à X=B. 


IF A THEN X=(A OR B) ELSE X-(A AND B) 


est équivalent à X=A. 


IF À AND B THEN X-A ELSE X-B 


est équivalent à X=B. 


IF À OR B THEN X=A ELSE X=-B 


est équivalent à X=A. 


IF À THEN X=B ELSE X-(A OR B) 


est équivalent à X=B. 


IF À AND B THEN X-A ELSE X-(A OR B) 


est équivalent à X=A OR B. 


EXEMPLE DE PROGRAMME 


Le programme de jeu donné ci-après consiste à deviner la carte 
choisie au hasard par l'ordinateur, dans un jeu de 52 cartes. Après 
chaque proposition du joueur, l'ordinateur indique si la couleur 
proposée est la bonne et si la valeur de la carte choisie est supérieure, 
inférieure ou égale à celle qu’il faut deviner. À chaque nouvel essai, 
l'ordinateur rappelle le résultat des coups précédemment joués. Le 
joueur a droit à trois essais. Il dispose d'un essai supplémentaire 
lorsqu'il a la chance de voir s'afficher le JOKER après un troisième 
essai infructueux. 
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19 CLS 

20 AFCL)="FIQUE Ms AZ) ="COEUR "5 8€ 
=MCARREAU" : A#(C4)="TREFLE" 

») Fi#="RONNE COULEUR" : FSFe "MAUVAISE C 
OGULEUR" 

40 Q1H= "VALEUR TROP FAIBLE" » GE#e"VALEU 
K TROF FORTE" 3 GE#= "VALEUR EXACTE" 

SO XI=1+INTCRNDCI)Kk4)  YIi=i+TNT CKND Ci) & 
13) 

te 

HO UHR HOMO REED EME DENON RM DEEE EME RE ER EE EE NE 
60 ‘ Froposition d'une carte par le joue 
Lt” 

él ROCK OROHEMEDE HE DE DE DEEE EME HE DDR BEM RE ME RE CHENE EME HE EME 
70 Nz=ï 

GO FARINT 23 PRINT PEÉSSAT NUMEROMSIN ss FRENT 






0 INPUT "Valeur de la carte (de L a 1%, 
valete=il,damesl, rolsdl) ‘5 CN) 
5 FRINT 
3 INFUT "Couleur choisie CFIGUESL, CÜE 
“ä CARREAUSS, TREFLES4) "My X CN) 
LiO IF X(N)ælû THEN END 
Lie 
LAD IREM HE PEMOHE DE DEEE NE DE DE MERE DEEE DER DE ME E EDEN 
120 ‘ Test de comparaison 
PRE DER DE EE DEEE ERREUR E 
ÉRINT 5 Xex CN) 4  YæY (N) 










Fee DE ROME RENE DEEE EEE RE EE HE EE HE EEE ME EC EE 
Léo ‘ Affichage des resultats 
LÉ RO RE DE DE DEEE DE RERO HE OEM DE RE EE MERE EEE EE GENE 
185 CLS 
170 PRINT 8 FeLINT CXND Ci KE) 
uitat des essais effectues®t à: 
déo FÜR dei TC N 
190 FRINT Yégii" de "3 AF(X (CT) )s TARCI7D"— 
ir MiFE(J) 3 FRINT TAR(CE1)0Q# (9) 3 FRINT 
200 NEXT J 2: NeN+i 3 IF NE4 THEN 80 ELSE 
IF Feo AND NES THEN FRINT "JOKER : essa 
i supplementaire" : GOTQ 80 
210 FRINT "Fas de chance ! Vous avez per 
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du 3; l'ordinateur avait choisi le “;Yi:" 
de "sAHCX1i) 

250 PRINT : FRINT "L'ordinateur a choisi 
un nouveau numero" 

250 PRINT "Four interrompre le jeu, tape 

r 10 pour la couleur" 

240 GOTO 50 


Le cœur de ce programme {ligne 140) est constitué de cinq 
instructions IF...THEN..ELSE imbriquées utilisant les opérateurs 
logiques XOR et AND. Elles permettent à l'ordinateur de tester la pro- 
position et de choisir ses réponses. 

Les lignes 20 à 40 affectent des valeurs de chaînes aux variables 
A$ à Q3$ ; cette procédure d’assignation permet d'éviter la répéti- 
tion de la même chaîne de caractères à plusieurs reprises, dans le 
programme. 

La ligne 50 génère au hasard deux nombres entiers, X1 (compris 
entre 1 et 4) et X2 (compris entre 1 et 13). X1 correspond à la couleur 
et X2 à la valeur de la carte à deviner (en respectant les conventions 
des lignes 100 et 90). 

N est le compteur du nombre de tentatives effectuées par le joueur. 
Il est initialisé à 1 au début du programme (ligne 70) puis est 
incrémenté d’une unité avant chaque nouvel essai (ligne 200). 

La valeur et la couleur de la carte proposée par le joueur en réponse 
aux instructions INPUT des lignes 90 et 100 sont respectivement 
stockées dans les variables indicées Y(N) et X(N). L'utilisation de 
variables indicées a pour seul but de conserver en mémoire, pour 
ensuite les afficher, les cartes choisies lors des (N —1) essais précé- 
dents. La ligne 110 teste la condition de sortie du programme. 

La ligne 140 détermine si la valeur et la couleur de la N'°me carte 
proposée par le joueur correspondent l’une et/ou l’autre à celles qu'a 
choisies l'ordinateur. L’appariement des expressions IF et des clauses 
THEN et ELSE est le suivant (voir l'instruction correspondante) : 


e Le premier IF et le premier THEN sont appariés au troisième ELSE. 
e Le deuxième IF et le deuxième THEN sont appariés au premier ELSE. 


e Le troisième IF et le troisième THEN sont appariés au deuxième 
ELSE. 


e Le quatrième IF et le quatrième THEN sont appariés au quatrième 
ELSE. 
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e Le cinquième IF et le cinquième THEN sont appariés au cinquième 
ELSE. 


En tenant compte de cette règle d’appariement et du tableau de 
vérité des opérateurs logiques donné plus haut, la ligne 140 est 
structurée de la manière suivante : 


IF X=X1 XOR Y=Y1 
THEN IF X=X1 AND Y < Y1 
THEN “couleur correcte et valeur trop petite” 
ELSE IF X=X1 AND Y > Y1 
THEN “couleur correcte et valeur trop grande” 
ELSE ‘couleur fausse et valeur exacte” 
ELSE IF X=X1 AND Y=Y1 
THEN “gagné !!!" 
ELSE IF Y > Y1 
THEN ‘couleur fausse et valeur trop grande” 
ELSE ‘couleur fausse et valeur trop petite” 


Les six possibilités étant ainsi différenciées, la ligne 150 permet d’as- 
signer les valeurs exactes aux messages à afficher sur l’écran. Pour 
des raisons pratiques, on utilise les variables alphanumériques P$ et 
Q$, car les noms des variables P$(N) et Q$(N) occupent trop de place 
et, s'ils étaient utilisés à la ligne 140, celle-ci dépasserait 255 caractères 
et deviendrait trop longue. 

La dernière partie du programme (lignes 160 à 240) concerne l’affi- 
chage à l’écran des résultats et les redirections du programme en fonc- 
tion du nombre de coups déjà joués. Un groupe d'instructions per- 
met de donner une quatrième chance au joueur : un nombre entier 
aléatoire O, 1 ou 2 est généré et stocké dans la variable F (ligne 170). 
Lorsque les conditions N<5 (qui est équivalente, d’après le test 
conditionnel qui précède, à N=4) et F=0 sont simultanément véri- 
fiées, un essai supplémentaire est accordé. Dans le cas contraire, la 
carte qu'avait choisie l’ordinateur est révélée et le jeu recommence 
avec tirage d’une nouvelle carte (renvoi à la ligne 50). 

Quelques instructions peuvent encore être ajoutées à ce programme 
afin d'initialiser de manière différente le générateur de nombres aléa- 
toires chaque fois que le programme est lancé. Ces instructions sont 
données en illustration de la rubrique ON BREAK... Elles mettent en 
jeu la commande ON BREAK CONT (disponible uniquement sur les 


— 186 - 


modèles CPC 664 et 6128) et la touche Esc ne peut donc plus être 
utilisée pour sortir du programme. C'est la raison pour laquelle une 
procédure de sortie particulière a été adoptée ici (lignes 110 et 230). 

D'autre part, quatre lignes de programme supplémentaires, décri- 
tes en regard de la rubrique ‘‘Gestion des erreurs’’, permettent de 
s'affranchir d’une entrée clavier erronée en réponse aux questions 
posées. 


Resultat des essais effectues 
3 de TREFLE ——}> MAUUVURISE COULEUR 
UALEUR TROP FAIBLE 
7 de COEUR ——} MAUVAISE COULEUR 
UALEUR TROP FAIBLE 
11 de PIQUE ——} BONNE COULEUR 
UALEUR TROP FAIBLE 
12 de PIQUE ——> BONNE COULEUR 
UALEUR TROP FAIBLE 
Pas de chance Vous avez perdu _: 7 ordi i 
nateur avait PS LE le 13 äe Pie QùE 


L'ordinateur a choisi un nouveau numero 
Pour interrompre le Jeu, taper 19 pour 
la couleur 
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ORIGIN 


L'instruction ORIGIN redéfinit les coordonnées de l’origine de l'écran 
graphique et permet de définir une nouvelle fenêtre graphique. 


FORMAT 


ORIGIN coord x, coord y <, gauche, droite, haut, bas > 


e coord x et coord y sont les coordonnées graphiques de la nou- 
velle origine. 


° gauche, droite, haut et bas sont les coordonnées de la nouvelle 
fenêtre graphique. 


COMMENTAIRES 


Après exécution de la commande ORIGIN, le curseur graphique 
est placé à la nouvelle origine ; tout se passe comme si une instruc- 
tion MOVE 0,0 avait été exécutée. 


EXEMPLE DE PROGRAMME 


Le programme illustrant la commande PLOT utilise l'instruction 
ORIGIN pour définir une nouvelle origine. Les lignes 280 à 330 tracent 
un cadre en conservant l’origine par défaut (en bas à gauche de 
l'écran), puis une nouvelle origine est définie au centre de l'écran : 


350 ORIGIN 319,199 
Cette instruction est destinée à placer la figure au centre de l'écran 


sans qu'il soit nécessaire de faire une translation des coordonnées 
de chaque point. 
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PAPER 


L'instruction PAPER initialise la couleur du fond pour la totalité de 
l'écran texte ou pour une fenêtre particulière. 


FORMAT 
PAPER < # numéro de canal, > numéro d'encre 
° numéro de canal est un nombre compris entre O et 7 qui caracté- 


rise une fenêtre particulière. 


° numéro d’encre est un nombre compris entre 0 et 15. 


COMMENTAIRES 


Lorsque le numéro de canal n’est pas précisé, la valeur 0 est prise 
par défaut. 

Sur les modèles CPC 664 et 6128, deux cas peuvent se présenter 
lorsqu'un caractère est écrit sur l'écran : 


e Sile stylo est initialisé en mode opaque (PEN #n1,n2,0), la matrice 
réservée au caractère (32x16 pixels en mode 0, 16*16 pixels en 
mode 1 et 8x16 pixels en mode 2) est remplie par la couleur de 
l'encre correspondant au papier. 


e Si le stylo est initialisé en mode transparent (PEN #n1,n2,1), la 
matrice réservée au caractère reste dans la couleur du fond. 


Après l'exécution d’une commande CLS, l'écran est initialisé dans 
la couleur du papier. 
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PEEK 


PEEK lit la valeur de l’octet, en mémoire centrale de l’ordinateur 
(mémoire RAM), dont l'adresse est donnée comme argument à la 
fonction. 


FORMAT 
PEEK(n) 


e nest un nombre entier compris entre 0 et 65535 (des valeurs néga- 
tives peuvent être données comme argument, l'ordinateur prenant 
alors le complément à 2, c'est-à-dire qu’il leur ajoute 65535). 


COMMENTAIRES 


Cette fonction permet une lecture directe du contenu de la mémoire 
vive RAM de l'ordinateur. Elle est complémentaire de l'instruction 
POKE, qui permet d'écrire directement des données à une adresse 
spécifiée de la mémoire. 

Supposons qu’un nombre ait été stocké à une adresse D de la 
mémoire RAM et que l’on veuille lire sa valeur au moyen de l'ins- 
truction PEEK. Pour comprendre la procédure à suivre, il est nécessaire 
de revenir sur le mode de stockage des informations par l'ordinateur. 

La mémoire est organisée en octets, chaque octet représentant 
l'association de 8 bits qui ne peuvent prendre chacun que la valeur 
0 ou 1. Supposons qu’un octet contienne la valeur 100. Cette valeur 
peut s'écrire 01100010 en binaire (voir les fonctions BIN$ et HEXS), 
c'est-à-dire que les bits de cet octet auront les valeurs respectives (de 
droite à gauche) 0,1,0,0,0,1,1,0. 

Une méthode commode de représenter cela est de donner un rang 
à chacun des bits et de lui affecter un poids dépendant de son rang. 
Ce poids est égal à 2 élevé à la puissance du rang, ce qui donne pour 
un octet : 
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La valeur de l’octet est simplement obtenue en additionnant le poids 
des bits qui sont positionnés (c’est-à-dire ceux qui ont la valeur 1) 
et en ignorant les bits qui sont à 0. (On peut effectivement vérifier 
que 100=2+32+64, ce qui correspond au positionnement des bits 
de rang 1, 5 et 6.) Si tous les bits sont positionnés, l’octet aura la valeur 
255, ce qui explique pourquoi un nombre ayant une valeur supérieure 
doit être stocké sur deux octets. 

Les bits du second octet, dit octet de poids fort, ont un rang allant 
de 8 à 15, soit, en fonction des règles précédemment énoncées, un 
poids allant de 256 à 32768 (2'5). En considérant ce mode de 
stockage sur deux octets, il est facile de montrer qu'il est possible 
de décomposer un nombre en deux facteurs résultant de sa division 
par 256: 





EAENES 


e le quotient entier de la division est stocké dans l’octet de poids 
fort (c'est celui qui aura l'adresse la plus élevée) ; 


e le reste de la division est stocké dans l’octet de poids faible. 


Pour avoir le nombre stocké à l'adresse D, il est donc nécessaire 
d'additionner le contenu pondéré des octets d'adresses D et D+1, 
c'est-à-dire d'écrire l'instruction : 


PEEK(D) + 256 + PEEK(D+1) 

L'argument de l'instruction PEEK peut également être exprimé en 
notation hexadécimale ; il doit dans ce cas être précédé du préfixe 
&H. Par exemple : 

PEEK(&HF00) 
retourne la valeur de l’octet d'adresse 3840 (en décimal). 


Des explications complémentaires concernant l’adressage direct de 
la mémoire sont données en regard de la fonction @. 
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PEN 


L'instruction PEN initialise la couleur de l'encre à utiliser, pour la 
fenêtre indiquée. 


FORMAT 
PEN < # numéro de canal, > < numéro d'encre > < ,\mode du fond > 


°_ numéro de canal est un nombre compris entre 0 et 7 qui caractérise 
une fenêtre particulière. 


° numéro d’encre est un nombre compris entre O et 15. 


° mode du fond est un paramètre qui n'existe pas sur le CPC 464 ; 
il peut prendre la valeur O ou 1. 0 correspond à un fond opaque, 
tandis que 1 correspond à un fond transparent. 


COMMENTAIRES 


Lorsque le numéro de canal n’est pas précisé, la valeur O est prise 
par défaut. 

Le programme suivant, destiné aux modèles CPC 664 et 6128, 
affiche un message en mode transparent et un autre en mode opaque : 


10 PAPER 0 

20 CLS 

30 INK 2,7 

40 PAPER 2 

50 PEN 1,0 

60 LOCATE 5,10 

70 PRINT “MESSAGE EN MODE OPAQUE" 

80 PEN 1,1 

90 LOCATE 5,15 

100 PRINT “’MESSAGE EN MODE TRANSPARENT" 
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CPI 


La constante PI est égale à 3,14159265 (valeur arrondie). 


FORMAT 





PI 


COMMENTAIRES ET EXEMPLE DE PROGRAMME 


Cette constante est essentiellement utilisée dans les calculs trigo- 
nométriques. Contrairement à beaucoup d’autres BASIC, celui de 
l’'Amstrad ne possède pas de fonction CIRCLE permettant de tracer 
directement un cercle. Le programme suivant permet d'effectuer ce 
tracé à l’aide des fonctions SIN et COS et de la constante PI. 


10 CLS 

20 FRINT "ENTREZ (DANS L'ORDRE ET SEFARE 
GS FAR UNE" 

#0 PRINT "VIRGULE) LES COORDONNEES HORIZ 
ONTALE" 

40 INFUT "ET VERTICALE DU CENTRE DU CERC 
LE"5X,Y 

50 PRINT 

6 INPUT "RAYON DU CERCLE":R 

70 MODE % 

80 ORIGIN 319,199 

90 MOVE X,Y+R 

100 FOR I1=0 TO 2*FI STEF FI/200 

110 DRAW X+RESINCI) ,Y+R#COS (I) 

120 NEXT I 
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PLOT et PLOTR 


Les instructions PLOT et PLOTR dessinent un point graphique à un 
endroit spécifié de l’écran. L'instruction PLOT est associée à des coor- 
données absolues, tandis que l'instruction PLOTR est associée à des 
coordonnées relatives. 


FORMATS 


PLOT coordonnée x, coordonnée y <,<n° d'encre > 
< ,mode d'encre > 


PLOTR déplacement x, déplacement y <,<n° d’encre > 
< mode d'encre > 


° Le numéro d’encre est un paramètre qui peut prendre des valeurs 
comprises entre 0 et 15 en fonction du numéro de l’encre choisie. 


e Le mode d'encre est un paramètre qui n'existe pas sur le CPC 464 ; 
il peut prendre les valeurs 0, 1, 2, 3 ou 4 suivant le mode d'inte- 
raction avec les couleurs de l'écran graphique. 


COMMENTAIRES 


Sur les modèles CPC 664 et 6128, il est possible de réaliser une 
opération logique entre la couleur dans laquelle est affiché le point 
graphique avant exécution de l'instruction PLOT ou PLOTR et la 
couleur spécifiée par le paramètre ‘’n° d’encre’’ (voir les instructions 
DRAW et DRAWR pour de plus amples informations concernant le 
mécanisme de ces opérations logiques). Ces opérations sont les 
suivantes : 


Normal 
OÙ exclusif (XOR) 
ET (AND) 

OÙ (OR) 
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EXEMPLE DE PROGRAMME 


Le programme ci-après utilise l'instruction PLOT pour tracer sur 
l'écran des points qui représentent l’interférence de deux mouvements 
vibratoires de fréquences différentes ; les figures obtenues s’appel- 
lent figures de Lissajous. Les coordonnées des points sont les 
suivantes : : 


x = Sin(rapl * T) 


y = sin(rap2 * T + D) 

Lors de l'exécution du programme, l'utilisateur doit entrer une 
valeur D qui représente la différence de phase entre les deux coor- 
données (lignes 110 à 180). Il doit ensuite indiquer (lignes 190 à 250) 
deux valeurs, RAP1 et RAP2, qui correspondent au rapport des deux 
angles. 

L'ordinateur passe en mode graphique haute résolution puis dessine 
un cadre sur les bords de l'écran. 

La ligne 350 permet de déplacer l’origine au centre de l'écran. 

Ensuite, les lignes 340 à 390 tracent la fonction ; le curseur graphique 
est placé sur le premier point et 5 000 points sont ensuite tracés. On 
remarque que la valeur 195, qui est assignée à la variable R (ligne 
60), représente pratiquement la moitié de l'axe vertical ; cela permet 
au dessin d'occuper la quasi-totalité de l'écran sans sortir des limites. 

Une figure simplifiée aurait pu être générée en modifiant les lignes 
370 et 380 : 


370 FOR T=-0 TO 2+PI STEP PI/200 
380 DRAW SINIRAP1+T}*R,SIN(RAP2*T +D)*R 


10 CLS 

20 MODE 1 

50 BORDER 3 

40 INF 0,0 

90 INF 1,16 

680 R=1i95 

70 WHILE 1 

80 CLS 

90 LOCATE 10,5 

100 PRINT "Figures de Lissajous" 
110 LOCATE 1,10 

120 PRINT "Dephasage (nombre —+ 
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130 
140 
150 
160 
170 
180 
190 
200 
210 
220 


Ce re 
FR Te) 


240 
250 
260 
268 
269 
270 
271 
280 





PRINT "compris entre © et" 
FRINT "2, il sera" 

PRINT "multilpie par FI.)" 
LOCATE 26,10 

INPUT "3 ",D 

D=DxFI 

LOCATE 1,16 

FRINT "Kapports des angles :" 
PRINT "(nombres entiers) ” 
LOCATE 10,19 

INFUT "premiere valeur 5 ",KAFI 
LOCATE 10,20 

INPUT "seconde valeur : ",KAFE 
CLS 


PORROHOMEOMDE DE DE DE DE DE NE DE DE DE DEEE HE DE DEEE DER ME DE MEME HE HE 
Trace du cadre 

LED DE DE DE DE DORE ME DEEE DEEE DEDE DE DÉ DEN DE DE DEEE MED NE NX 

MODE % 

MOVE 0,0 

DKAW 459,0 

DRAW 6:9,:99 

DRAW 0,599 

DRAW 0,0 


PME DE MEME DD DE DE DEEE DE DE HE ECDE EH DEEE EE DE EN 
Trace de la fonction 

PRE DE DE DENON DEEE DE DE DE DE DE DEEE DE DEMME DEEE DEEE DE RE DE DEEE 

ORIGIN 319,199 

MOVE O,SIN CD) #K 

FOR T=0 TO ZxFI STEF 2#FI1/5000 

FLOT SINCRAFLET) KA, SIN CRAFT +10) #5 

NEXT T 

LÜOCATE 2,24 


PRINT "Fin!" 

C$=" 

WHILE CF="" : CH=INEEY# : WEND 
MODE 1 

WEND 
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POKE permet de stocker un octet de données à une adresse de la 
mémoire centrale (RAM) spécifiée. 


FORMATS 
POKE n,m 


e nest l'adresse de la mémoire qui doit recevoir les données ; il s’agit 
d’un nombre entier compris entre O et 65535. 


e m représente la valeur à stocker, sous forme d’un nombre entier 
compris entre O et 255. 


COMMENTAIRES 


Le format de stockage des données (m, nombre d'octets) est 
expliqué à propos de la fonction PEEK, qui est complémentaire de 
POKE. Cette instruction écrivant directement dans la mémoire cen- 
trale de l'ordinateur, toute erreur peut avoir des conséquences fâcheu- 
ses sur le fonctionnement de celui-ci. Cependant, elle ne peut altérer 
en aucune manière le matériel puisque, à la mise hors tension, le 
contenu de la mémoire vive est effacé. 

Le programme donné en illustration de l'instruction MEMORY utilise 
l'instruction POKE pour écrire trois instructions en langage machine. 
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Les fonctions POS et VPOS renvoient respectivement, en mode texte, 
la position horizontale (numéro de colonne) et la position verticale 
(numéro de ligne) du curseur tel qu’il apparaît sur l'écran. 


FORMATS 


POS (# numéro de canal) 


VPOS (# numéro de canal) 


° numéro de canal peut prendre des valeurs comprises entre 0 et 
9 pour la fonction POS ; il spécifie l’écran entier ou une fenêtre 
(0 à 7), l'imprimante (8), le magnétophone ou le lecteur de disque 
(9). 


° numéro de canal peut prendre des valeurs comprises entre O0 et 
7 pour la fonction VPOS. 


COMMENTAIRES 


La fonction POS(#8) renvoie la position de la tête d'impression, 
valeur qui est comprise entre 1 et 132 si l'imprimante n’a pas été ini- 
tialisée par une commande WIDTH. 

La fonction POS(#9) renvoie la position du pointeur dans la mémoire 
tampon, c'est-à-dire le nombre de caractères qui ont été envoyés 
depuis le dernier retour chariot, CHR$(&HOD). S'il ne contient aucun 
caractère, la valeur 1 est retournée. 

Quel que soit le mode, la fonction VPOS renvoie une valeur 
comprise entre 1 et 25. 

La fonction POS retourne une valeur dont les limites sont liées au 
mode en cours : entre 1 et 20 pour le mode O, entre 1 et 40 pour 
le mode 1, entre 1 et 80 pour le mode 2. 

Un exemple d'utilisation de la fonction POS est donné dans le 
programme illustrant l'instruction KEY. 
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Les fonctions XPOS et YPOS sont associées au curseur graphique 
et ont un rôle équivalent à celui des fonctions POS et VPOS. L'ins- 
truction LOCATE permet de positionner le curseur texte à l'écran (ou 
sur l'imprimante). CURSOR permet de rendre le curseur texte visible 
ou invisible. 
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1. . . N r . . LA 
L'instruction PRINT affiche à l'écran ou imprime les données ou les 
messages spécifiés. Une syntaxe particulière permet d'écrire les mêmes 
données dans un fichier stocké sur cassette ou sur disque. 


FORMAT 





PRINT < N° de canal, > < liste d'expressions > <; > 


e La liste d'expressions est une suite d'expressions numériques et/ou 
de chaînes de caractères. Des expressions consécutives sont sépa- 
rées par des virgules, des espaces ou des points-virgules. Toute 
constante chaîne de caractères doit se trouver entre guillemets. Le 
mot clé PRINT peut être remplacé par un point d'interrogation. 


e Le N° de canal est un nombre entier compris entre O et 9. La valeur 
par défaut est 0. Les valeurs comprises entre 0 et 7 correspondent 
aux fenêtres définies par l'instruction WINDOW. La valeur 8 cor- 
respond à une sortie sur imprimante. Le canal 9 est utilisé pour 
adresser l'unité standard de sortie (magnétocassette ou unité de 
disque), c’est-à-dire pour écrire les données dans un fichier ouvert. 


RÈGLES DE SYNTAXE ET COMMENTAIRES 


Lorsque l'instruction PRINT n’est pas suivie d’une liste d’expres- 
sions, une ligne blanche est affichée (ou imprimée). La ponctuation 
à l’intérieur de la liste d'expressions détermine le format de l'affichage. 

Des expressions séparées par un point-virgule ou par un ou plu- 
sieurs espaces sont affichées les unes à la suite des autres. Par exemple, 
les deux lignes suivantes : 


PRINT ‘“Illustration’”;"de";"l'instruction";"PRINT" 
PRINT “lllustration”” “de” “l'instruction” “PRINT” 


sont équivalentes (elles peuvent également être écrites en mode pro- 
gramme) et conduisent à l'affichage (sans espace entre les mots) de : 
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Illustrationdel'instructionPRINT 


Si la liste d'expressions est trop longue pour que toutes puissent 
être écrites sur la même ligne, l'affichage se poursuit à la ligne suivante. 

Lorsque les expressions de la liste sont séparées par une virgule, 
BASIC utilise la tabulation automatique dont la taille est définie par 
l'instruction ZONE : chaque ligne sur l’écran ou sur le papier est 
divisée en zones de Z caractères, Z étant la valeur du paramètre de 
ZONE. Chaque expression est affichée au début de la première zone 
non occupée, même partiellement, par l'expression précédente. Plu- 
sieurs virgules consécutives peuvent figurer dans une instruction 
PRINT. Dans ce cas, les virgules supplémentaires définissent autant 
de zones blanches. 

Lorsqu'une liste d'expressions se termine par une virgule, un point- 
virgule ou une fonction SPC ou TAB, l'affichage commandé par l'ins- 
truction PRINT suivante s'effectue sur la même ligne, en respectant 
les espaces. Dans le cas contraire, l'affichage commence au début 
d’une nouvelle ligne. 

Les nombres affichés à l’écran ou sur l'imprimante sont toujours 
suivis d’un espace. Ils sont également précédés d’un espace s’il s’agit 
de nombres positifs ou d’un signe moins (—) s’il s'agit de nombres 
négatifs. 

L'instruction PRINT USING permet de modifier le format d’impres- 
sion des nombres et des chaînes de caractères à l'écran et sur 
l'imprimante. 

Les fonctions TAB et SPC peuvent être utilisées en relation avec 
l'instruction PRINT pour modifier les caractéristiques de l'affichage. 
L'instruction WIDTH détermine le nombre maximal de caractères 
imprimés sur une ligne. 
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PRINT...USING 


L'instruction PRINT... USING permet d'envoyer des données forma- 
tées vers l’unité périphérique spécifiée. 


FORMAT 


PRINT < # N° de canal, > < liste d'expressions > 
USING chaîne modèle < ,séparateur et expression > 


e Les paramètres qui suivent le mot clé PRINT sont les mêmes que 
ceux qui sont décrits à propos de l'instruction PRINT. 


e La chaîne modèle est une chaîne de caractères (Variable ou cons- 
tante) qui définit les caractéristiques de l'affichage. 


e Le séparateur est une virgule ou un point-virgule. 


COMMENTAIRES 


Les différentes options possibles pour la ‘‘chaîne modèle’ dépen- 
dent de la nature (numérique ou alphanumérique) des expressions 
à afficher ou à imprimer. Pour l'impression et l'affichage de nombres, 
les seuls caractères admis sont les suivants : 


# EL x $ + — 


Leur signification et la manière dont ils peuvent être combinés dans 
la chaîne modèle sont expliquées à propos de l'instruction DEC$. 

Pour formater une expression alphanumérique, les symboles 
suivants peuvent être utilisés dans la chaîne modèle : 


L\ & 


! Seul le premier caractère de l'expression sera affiché ou 
imprimé. 
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Ke À Les caractères \ indiquent une longueur d'impression égale 
au nombre d'espaces plus deux compris entre les deux 
symboles \. Si la chaîne est plus courte que le modèle, 
elle est complétée à droite par des blancs. 


& Spécifie que la chaîne entière doit être affichée, quels que 
soient sa longueur ou son format. 


Exemple 
10 A$="cor":B$="au":C$ = "pied" 
20 PRINT USING “!l’A$:B$;C$ 
30 PRINT USING “\ \’:A$:B$ 


conduira à l'affichage suivant : 


cap 
corau 
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READ/DATA 


L'instruction DATA fournit des valeurs (numériques ou de chaînes) 
lues en cours d'exécution du programme par l'instruction READ. 


FORMATS 


DATA valeur < ,valeur > … 


READ variable < ,variable > … 
Exemples 


DATA 3,9,15,16 
DATA Louis, Charles ,Henri,16,9,4 
DATA ‘“’DUVAL,012 29 34'',‘DUPONT,720 08 38” 


READ C$,N,H1 
DATA B$(1),B$(4) 


RÈGLES DE SYNTAXE 


Chaque instruction DATA et chaque instruction READ peuvent 
comporter autant de valeurs et de variables qu'une ligne de pro- 
gramme en contient (jusqu’à 255 caractères). Ces valeurs et ces varia- 
bles doivent être séparées par une virgule. 

Les chaînes données comme valeur dans une instruction DATA 
peuvent être où non placées entre guillemets. Cependant, les guille- 
mets sont obligatoires lorsqu'une valeur de chaîne contient une vir- 
gule, deux points (:) où un espace significatif de début ou de fin. 


COMMENTAIRES 


Des valeurs numériques et des valeurs de chaînes peuvent figurer 
dans une même instruction DATA. Les valeurs contenues dans 
l'ensemble des instructions DATA d’un programme forment un fichier 
séquentiel unique (c’est-à-dire une liste ordonnée), quels que soient 
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le nombre de valeurs par instruction, la nature de ces valeurs et 
l'emplacement (par rapport aux instructions READ) des instructions 
DATA dans le programme. 

Ce fichier est stocké dans le programme BASIC (et non sur un 
support mémoire externe) et l’ordinateur déplace un pointeur dans 
le fichier à mesure que les valeurs sont lues par les instructions READ. 
Le type de variable (numérique ou chaîne de caractères) spécifié 
comme argument de l'instruction READ doit correspondre à celui de 
la valeur courante positionnée par le pointeur. 

Les instructions DATA peuvent comporter un plus grand nombre 
de valeurs que n’ont à en lire les instructions READ lors de l’exécu- 
tion d’un programme (auquel cas les valeurs supplémentaires sont 
ignorées). Par contre, l'inverse n’est pas vrai. Si le nombre de varia- 
bles des instructions READ est supérieur au nombre d'éléments de 
DATA, un message d'erreur est affiché (‘Data exhausted’’, plus de 
données disponibles). Cependant l'instruction RESTORE permet de 
réinitialiser la position du pointeur au niveau de la première valeur 
de la première instruction DATA du programme, où d’une autre ligne 
d'instruction DATA spécifiée comme paramètre de l'instruction 
RESTORE. 


EXEMPLE DE PROGRAMME 


Dans cet exemple, les données sont lues à l’intérieur de boucles 
FOR/NEXT. Cette méthode peut être utilisée avec profit pour assigner 
des valeurs à un tableau. 

On remarquera en particulier que le tableau de chaîne A$ et le 
vecteur À sont remplis successivement et non alternativement. Une 
séquence du type : 


30 FOR 1-1 TO 8 
35 READ A$lI),A{l) 
40 NEXT | 


conduirait à une erreur de syntaxe (‘’Syntax error’). En effet, le fichier 
de données étant séquentiel, la valeur assignée à A(1) serait SEINE 
ET MARNE, c'est-à-dire une valeur de chaîne. 


10 CLS 
20 FRINT "VOULEZ-VOUS LA LISTE" 
50 FRINT "- DES NOMS (1)" 
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S NUMEROS {2° 
S NONS ET DES NUMÉROS (Ci) 
DEFARTEMENTS DE L'ILE-DE-F 


40 PRINT "- D 
“O PRINT "- D 
60 INFUT "DES 
RANCE"; W 

70 FOR I=i TO 8: READ Af(I): NEXT I 

80 FOR I=i TO 8: READ 4(I): NEXT I 

Go LOCATE 1,10 

100 ON W GOTO 110,170,130 

110 FOR Isi TO 8: PRINT A#(CI): NEXT Le 


E 
E 






END 

120 FOR Izi TO 8: FRINT ACI)s NEXT 
END 

150 FOR Teil TO 8: FHINT ACI) ,AÆCL)s NEXT 
ls END 


140 DATA FARIS,GSEINE ET MARNE, YVELVYNES ,E 
SSONNE , HAUTS-DE-SEINE, SEINE-ST-DENTS, VAL 


… DE-MARNE , VAL D'OISE 
150 DATA 75,77,78,91,92,95,94,95 
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REM 


1. . . r . . . 
L'instruction REM permet d'insérer des commentaires dans le listing 
d'un programme. Ces commentaires ne sont pas affichés à l'écran 
et sont ignorés lors de l'exécution du programme. 


FORMAT 
REM remarque 


° remarque est constitué d’une suite quelconque de caractères. 


COMMENTAIRES 


Les instructions REM permettent de documenter un listing de pro- 
gramme avec des informations courtes et explicites. Cependant ces 
instructions occupent une partie de la mémoire centrale de l’ordina- 
teur. Dans de longs programmes, on est amené à chercher le meil- 
leur compromis possible entre la nécessité de pouvoir disposer d’une 
place mémoire suffisante pour y stocker programmes et données et 
le souci d'établir des listings facilement déchiffrables. 

L'exécution d’un programme peut être redirigée, au moyen d'un 
THEN ou d’un GOTO par exemple, vers une ligne commençant par 
une instruction REM. Dans ce cas, le déroulement du programme 
reprend à la première instruction exécutable qui suit cette instruc- 
tion REM. 

Les instructions REM ne sont pas nécessairement placées en tête 
d'une ligne de programme. Lorsqu'elles constituent la dernière (ou 
la seule) instruction d’une ligne, il est possible de remplacer le mot 
clé REM par une simple apostrophe. Par exemple, les deux lignes sui- 
vantes sont équivalentes : 


100 PRINT ‘première instruction”":REM dernière instruction 


100 PRINT “première instruction” ‘dernière instruction 
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EX 


La fonction REMAIN désactive le chronomètre spécifié et renvoie le 
temps qui restait à courir avant l'exécution de l'instruction GOSUB 
associée à la commande AFTER... ou EVERY... 


FORMAT 
REMAIN (n° de chronomètre)… 


e Le numéro de chronomètre peut prendre les valeurs O, 1, 2 ou 3. 


COMMENTAIRES 


Si le chronomètre n’a pas été déclenché par une instruction AFTER... 
ou EVERY..., la fonction REMAIN retourne la valeur 0. Le programme 
suivant : 


10 EVERY 50 GOSUB 100 

20 FOR 1=1 TO 3000 : NEXT | 
30 A=REMAIN(0) 

40 B=REMAIN(1) 

50 PRINT A;";"B 

60 END 

100 SOUND 2,25 

110 RETURN 


génère l'affichage : 
38,0 
On remarque que la fonction REMAIN ne peut pas apparaître seule 


sur une ligne de commande ou de programme ; le résultat retourné 
doit être stocké dans une variable. 
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La commande RENUM permet de renuméroter les lignes d’un 
programme. 


FORMAT 


RENUM < nouveau numéro > <,< ancien numéro > 
< ,incrément > > 


° nouveau numéro est le premier numéro devant être affecté à la 
première ligne renumérotée. La valeur par défaut est 10. 


° ancien numéro est le numéro de la ligne de programme où doit 
commencer la renumérotation. Lorsque cet argument n’est pas pré- 
cisé, la renumérotation commence à partir de la première ligne 
du programme. 


e_incrément est l'écart entre les numéros de deux lignes consécutives 
dans la nouvelle séquence. La valeur par défaut est 10. 


COMMENTAIRES 


Lorsque la commande RENUM est exécutée, les numéros de lignes 
figurant dans les instructions GOTO, GOSUB, THEN...ELSE, 
ON...GOTO, ON...GOSUB, RESTORE, RESUME et ERL sont égale- 
ment modifiés, afin de s’accorder avec la nouvelle numérotation du 
programme. 

La commande RENUM ne peut pas être utilisée pour intervertir 
l’ordre de certaines lignes d’un programme. Par exemple, la com- 
mande RENUM 20,50 exécutée sur un programme comportant les 
lignes 10,30 et 50 conduira à l'affichage du message d’erreur 
‘’Improper argument’” (Argument incorrect). Le même message appa- 
raît lorsque la renumérotation a pour effet de créer des numéros de 
ligne supérieurs à 65535. 
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Exemples 

RENUM 
renumérote toutes les lignes de programme, la première ayant désor- 
mais le numéro 10. L'incrément entre deux lignes consécutives est 
de 10. 


RENUM 100,20 


renumérote tout le programme. La première ligne a désormais le 
numéro 100 et l’incrément entre deux lignes consécutives est de 20. 


RENUM 100,90,20 


attribue le numéro 100 à l’ancienne ligne 90 et renumérote les lignes 
suivantes de 20 en 20. 
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RESTORE 


L'instruction RESTORE réinitialise le pointeur du fichier séquentiel 
formé par les valeurs contenues dans les instructions DATA, au niveau 
d’une ligne d'instruction spécifiée ou à celui de la première instruc- 
tion DATA du programme. 


FORMAT 





RESTORE < N° de ligne > 


e Le N° de ligne doit correspondre à une ligne existant dans le pro- 
gramme. Le pointeur est alors placé au niveau de la première 
donnée de la première instruction DATA rencontrée après ce 
numéro de ligne. 


COMMENTAIRES 


La lecture du fichier séquentiel constitué par l’ensemble des données 
contenues dans les instructions DATA du programme est effectuée 
par les instructions READ à partir de la position courante du poin- 
teur. RESTORE permet de réinitialiser cette position courante. Lors- 
que le numéro de ligne est omis, le pointeur est repositionné au niveau 
de la première valeur du fichier. 

Le numéro de ligne spécifié ne doit pas nécessairement corres- 
pondre à une ligne contenant une instruction DATA. Le pointeur se 
placera en effet automatiquement au niveau de la première valeur 
de l'instruction DATA se trouvant au numéro de ligne supérieur le 
plus proche. 


EXEMPLE DE PROGRAMME 


Le programme suivant affiche à l'écran la liste des nombres pre- 
miers inférieurs à 10, ou compris entre 10 et 20, ou encore compris 
entre 20 et 30. 
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La variable B détermine le nombre de données contenues dans cha- 
cune des listes. Le pointeur est réinitialisé de manière différente (lignes 
200 à 400) selon l'option choisie. 


19 CLS 

20 PRINT "SOUHAITEZ-VOUS LA LISTE DES Nû 
MÈRES FREMIERS" 

FO PRINT " — INFÉRIEURS A 16 C1)" 

40 PRINT " — COMPRIS ENTRE 10 ET 20 (2° 
50 PRINT " - COMPRIS ENTRE 20 ET 30 (H" 
60 INFUT W 

70 CLS 

80 ON W GOSUE 200,300 ,400 

90 READ À# 

100 FRINT A 

110 FOR Ii TO E 

READ N 

PRINT N 

NEXT 1 

PRINT: GOTO 20 

RH REE DEREMO RECU HE ME HER EDEN ORCH RE JE ECROM EX 
DATA NOMBRES FREMIERS INFERIEURS À i 





DATA 1,2,3,5,7 





DATA NOMBRES FREMIERS COMPFRIS ENTRE 

10 ET 20 

175 DATA 11,15,17,19 

179 ‘ 

180 DATA NOMBRES FREMIERS COMFRIS ENTRE 

20 ET 50 

185 DATA 22 

189 ‘ 

LOC HE DE DE DE DE DE DD DEDE DE ÉD DE HE DE DE MODE DE DE DEEE NE 

191 ‘SOUS-FROGRAMNMES REINITIALISANT LE 
FOINTEUR 

LD HORDE RE DEDEDEDEDEDE DE DEEE DE DEEE DEEE DE DE DE HE DEEE 

200 RESTOKRE 160:HR=5:RETURN 

500 RESTORE 170: HR=4: RETURN 

400 RESTORE 180:EH=2: RETURN 


Li 


,29 
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RND et RANDOMIZE 


La fonction RND renvoie un nombre aléatoire compris entre 0 et 1. 
L'instruction RANDOMIZE initialise la fonction RND pour une 
séquence particulière. 


FORMATS 


RND < expression numérique > 


RANDOMIZE expression numérique 


e L'expression numérique possède une valeur quelconque, positive 
ou négative. 


COMMENTAIRES 


Les nombres générés par la fonction RND sont des nombres pseudo- 
aléatoires. Le paramètre associé à la commande RANDOMIZE sert 
à initialiser cette séquence et, si l’initialisation est identique, la suite 
de nombres aléatoires est elle-même identique. 

Si l’on souhaite que l'ordinateur produise toujours la même série, 
on insère au début du programme une ligne contenant l'instruction 
RANDOMIZE. Cela est très intéressant pour la mise au point de 
certains programmes, programmes de jeux par exemple. 
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RUN 


La commande RUN déclenche l'exécution du programme se trouvant 
en mémoire centrale de l’ordinateur. Elle peut aussi, avec une syntaxe 
particulière, charger un programme se trouvant sur disquette avant 
de l’exécuter. 


FORMATS 


RUN < numéro de ligne > 


RUN ‘’nom de programme’’ 


COMMENTAIRES 


La seconde syntaxe de la commande RUN est équivalente à l'ins- 
truction LOAD utilisée pour charger puis exécuter un programme 
stocké sur disquette ou sur cassette. 

Lorsque, avec la première syntaxe, le numéro de ligne n’est pas 
précisé, l'exécution commence à la première ligne du programme 
en mémoire. S'il est spécifié, l'exécution commence à partir de cette 
ligne. 

L'exécution de la commande RUN a pour conséquence d'initialiser 
toutes les variables à O. 

La commande RUN ‘’nom de programme’ est la seule qui permette 
l'exécution d’un programme protégé. 
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SAVE 


L'instruction SAVE sauvegarde un programme sur disquette ou sur 
cassette. 


FORMAT 


SAVE ‘’nom du fichier’’ < ,type de fichier > 
< ,paramètres binaires > 


e Le type de fichier peut être A (ASCII), P (protégé) ou B (binaire) ; 
si aucun paramètre n’est indiqué, il est stocké sous forme codée 
condensée. 


Si le fichier est sauvegardé sous forme binaire, certains paramètres 
doivent être spécifiés lors de la sauvegarde : l'adresse du début 
de zone mémoire à sauvegarder, la longueur du fichier et l'adresse 
du point d'entrée. 


e Le nom du fichier doit respecter les règles énoncées dans la 
rubrique ‘‘’Commandes AMSDOS". 


COMMENTAIRES 


L'instruction SAVE sauvegarde un programme sur cassette où sur 
disquette. Dans le cas d’une sauvegarde sur disquette, un programme 
préalablement stocké sur celle-ci sous le même nom de fichier est 
automatiquement réécrit avec l'extension de nom .BAK (voir la 
rubrique ‘’Commandes AMSDOS"’). La forme sous laquelle est stocké 
le fichier dépend des paramètres de l'instruction SAVE. 

Un programme stocké sous forme binaire ne peut pas être fusionné 
(au moyen de la commande MERGE) avec un autre programme se 
trouvant déjà en mémoire centrale de l'ordinateur. 

Un fichier sauvegardé par une instruction SAVE sera à nouveau 
chargé en mémoire centrale au moyen de l'instruction LOAD (ou, 
dans certains cas, MERGE ou RUN), sauf s'il a été sauvegardé avec 
l'option P (protégé) ; dans ce cas, seule la commande RUN permet 
de le charger puis de l’exécuter. 
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Exemple 
SAVE ‘’MACHO”,A 


Le programme résidant en mémoire centrale est stocké, sous le nom 
de MACHO et sous forme ASCII, sur disquette ou sur cassette. 


SAVE ‘“’MAFROI",B,6000,5000,6005 
Le contenu de la zone mémoire comprise entre les adresses 6000 
et 11000 (6000 + 5000) est recopié sur disque ou sur cassette sous le 
nom ‘MAFRO!”’ ; le point d'entrée est à l'adresse 6005. Il est possible 
de sauvegarder de cette manière les 16K de la mémoire écran, sous 


forme de fichier binaire : 


SAVE “ECRAN",B,&C000,&3FCF 
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(ENT, ENV, ON S0O...GOSUB, 
RELEASE, SQ, SOUND) 





La programmation des sons est relativement complexe sur Amstrad. 
Cette complexité est due au fait qu’il est possible de contrôler indivi- 
duellement presque tous les paramètres formant une onde sonore. 
Les instructions et fonctions gouvernant la gestion du son vont être 
détaillées après un bref rappel de notions élémentaires de solfège. 


LE SOLFÈGE ET LA REPRÉSENTATION DES NOTES 


La gamme musicale est divisée en octaves. La fréquence d’une note 
appartenant à une octave donnée est égale au double de la fréquence 
de la note portant le même nom dans l’octave immédiatement infé- 
rieure. Par exemple, la note ré de l’octave O0 correspond à une fré- 
quence de 293,665 Hz alors que la fréquence de la note ré de l’octave 
1 vaut 587,330 Hz. La note émise à une fréquence de 440 Hz corres- 
pond à la fréquence de vibration du diapason. Cette note de réfé- 
rence est appelée /a international ; elle définit la note /a de l’octave 0. 

Une convention occidentale divise chaque octave en 12 unités 
appelées demi-tons. La différence de fréquence entre deux notes 
consécutives (do et ré, ou sol et la par exemple) correspond à deux 
demi-tons. Les demi-tons définissent l’altération (dièse ou bémol) des 
notes. Une note dièse est jouée un demi-ton au dessus de la note 
non altérée, alors que le bémol correspond à une altération d’un demi- 
ton au-dessous. La fréquence de la note (avec ou sans altération) cor- 
respondant à un demi-ton particulier se calcule au moyen de la for- 
mule suivante : 


FREQUENCE = 440 X (2 puissance N + (10-n)x 12) 


° Nest le numéro de l’octave, l’octave 0 étant celle à laquelle appar- 
tient le /a international. Les numéros sont positifs et négatifs de part 
et d'autre de cette octave particulière. 


e nest le numéro du demi-ton dans l’octave. 
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La correspondance entre le nom des notes et les numéros des demi- 
tons est la suivante (# représente le dièse, b le bémol) : 


DO DO# RÉ Mib MI FA FA#H SOL SOL# LA Sib SI 
1 2 3 4 5 6 7 8 g 10 11 12 


L'ensemble des notes (altérées et non altérées) d’une octave forme 
une gamme chromatique. Les altérations ne sont définies que s’il existe 
une touche noire correspondante sur le clavier du piano. C’est la 
raison pour laquelle les notes : 


MI# (ou FAb) et SI# (ou DOb) 


n'existent pas dans la gamme chromatique. La dénomination des notes 
altérées est purement conventionnelle ; on parle de do dièse et non 
de ré bémol pour désigner le demi-ton situé entre le do et le ré. 

La notation anglo-saxonne représente les notes par une lettre 
unique, et non par une syllabe. La lettre € correspond au do, D à 
ré, …, G à sol, À à la et B à si. Cette notation est utilisée dans le pro- 
gramme de démonstration, afin de simplifier la saisie des notes. 

D'un point de vue physique, l'émission d’une note correspond à 
la propagation d’une onde sonore. Comme les autres types d'ondes, 
une onde sonore peut être caractérisée par l’un ou l’autre des deux 
paramètres suivants : sa fréquence ou sa période. La fréquence défi- 
nit le nombre de cycles par unité de temps, tandis que la période 
correspond à la durée d’un cycle. La relation entre ces deux para- 
mètres est la suivante (lorsque la fréquence est exprimée en hertz 
(H2)) : 


PERIODE = 125 000 / FREQUENCE 


Les fréquences et les périodes des notes de la gamme chromatique 
sur huit octaves sont données dans le manuel de l'utilisateur livré avec 
l'ordinateur (Annexe VII pour le manuel du CPC 464 et Paragraphe 5 
du Chapitre 7 pour le manuel du CPC 664). 

La fréquence (ou la période) n’est qu’un des éléments qui permet- 
tent de caractériser une note ; d’autres paramètres importants doivent 
être précisés, en particulier sa durée. La durée absolue d'une note 
se calcule à partir de deux paramètres : la valeur de la note (noire, 
blanche, etc.) et le tempo du morceau de musique, c'est-à-dire le 
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nombre de noires émises par minute (la noire représentant la durée 
unitaire pour le calcul du tempo). Les valeurs relatives des notes sont 
les suivantes (de la plus courte vers la plus longue) : 


Triple croche 1/8 de noire 
Double croche 1/4 de noire 
Croche 1/2 noire 
Noire 

Blanche 2 noires 
Ronde 4 noires 


La longueur d'une note peut d'autre part être augmentée de moi- 
tié si on la fait suivre d’un point. Ainsi, une blanche pointée corres- 
pond à 3 noires. 

Signalons enfin qu'une onde sonore n’est généralement pas une 
sinusoïde parfaite. Il existe des variations d'amplitude (c’est-à-dire de 
volume) et éventuellement des variations rapides de fréquence à l’inté- 
rieur d’un cycle (vibrato). Ces deux paramètres peuvent être repro- 
duits par le synthétiseur de l’Amstrad au moyen des commandes ENV 
(enveloppe de volume) et ENT (enveloppe de ton). 


LE SYNTHÉTISEUR DE SON DE L'AMSTRAD 


Le synthétiseur de son de l’Amstrad possède trois canaux sonores 
et un canal de bruit. Huit octaves sont disponibles (—3 à 4). Les canaux 
sont indépendants mais peuvent néanmoins être synchronisés si l’on 
donne une valeur adéquate au premier paramètre de l'instruction 
SOUND. Au niveau de chaque canal, les sons à jouer sont placés 
dans une file d'attente (les fameuses queues qui attendent des 
‘‘’rendez-vous”’, en fonction de la position des bits, dans le manuel 
Amstrad), chaque file d'attente pouvant contenir jusqu’à cinq notes. 
La gestion de ces files peut être étudiée simplement au moyen des 
quelques lignes de programme suivantes : 


10 SOUND 1,284+8+1,300 

20 IF 1-9 THEN 50 ELSE PRINT | 
30 1=1+1 

40 GOTO 10 

50 END 
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Le paramètre | permet de modifier la période de la note jouée par 
l'instruction SOUND de la ligne 10. Chaque note a une durée de 
3 secondes (paramètre 300). La valeur de | est affichée à chaque modi- 
fication. Lorsque l'exécution du programme est terminée (ligne 50), 
le message Ready (prêt) apparaît à l'écran. Il suffit de faire tourner 
ce programme pour comprendre l’organisation d'une file d'attente. 

Dès le début de l'exécution, les valeurs 0 à 4 sont affichées et la 
première note commence à être jouée. Les cinq premières notes ont 
donc été placées dès le début du programme dans la file d'attente. 
Le programme a continué de s’exécuter, sans attendre la fin de l’exé- 
cution de la première instruction SOUND. Dès qu'une note a été 
jouée, la file se décale vers le haut et une nouvelle valeur de ! s'affiche 
(c'est-à-dire qu’une nouvelle note prend place en fin de file). La fin 
de l'exécution du programme (message Ready) se termine bien avant 
que la dernière note ait été jouée, la file devant encore être vidée. 

Cette organisation permet d'optimiser le temps d'utilisation du 
microprocesseur. Les opérations qu'il doit réaliser s'exécutent beau- 
coup plus rapidement que la durée habituellement programmée pour 
une note. Aussi est-il possible, au moyen de la fonction SQ et de l'’ins- 
truction ON SQ(n)...GOSUB, de simuler une utilisation multitâche, 
c'est-à-dire de faire jouer en continu un morceau de musique tandis 
que le microprocesseur paraît effectuer une opération complètement 
différente (affichage, calcul, impression, etc.). 
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SOUND 


L'instruction SOUND permet de programmer les sons produits par 
le circuit générateur intégré à l’Amstrad. 


FORMAT 





SOUND sélection du canal,période du ton, < durée>, 
< volume > , < enveloppe du volume>, 
< enveloppe du ton >, < période d’un bruit > 


e Seuls les deux premiers paramètres doivent être obligatoirement 
fournis, les autres étant optionnels. 


PARAMÈTRES 
Sélection du canal (et synchronisation) 


Ce paramètre est codé sur un octet et peut donc recevoir une valeur 
comprise entre O et 255. Il sert à diriger le son vers l’un des trois canaux 
du synthétiseur, ainsi qu’à établir les conditions de synchronisation 
avec les sons transmis par les autres canaux. Le positionnement de 
chacun des huit bits de cet octet correspond à une action particulière : 


Poids (décimal) Commande lorsque le bit est positionné 


Dirige le son vers le canal A 
Dirige le son vers le canal B 
Dirige le son vers le canal C 
Synchronisation avec le canal A 
Synchronisation avec le canal B 
Synchronisation avec le canal € 
Bit d'attente 
Bit de priorité 
















NO 01 BR © ND — © 


Le positionnement du bit 6 (bit d'attente) provoque l'interruption 
de la transmission des sons par le canal sélectionné par l'instruction 
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SOUND correspondante. Les notes se trouvant dans la file sont en 
attente jusqu’à ce que soit exécutée une instruction RELEASE(n), n 
spécifiant le numéro du canal (1 pour À, 2 pour B et 4 pour C). 

Le positionnement du bit 7 déclare que le son correspondant à cette 
instruction SOUND est prioritaire sur tout autre son en attente dans 
la file ou en train d'être transmis par l'intermédiaire du canal (ou des 
canaux) utilisé(s) par l'instruction prioritaire. Quand une telle instruc- 
tion SOUND prioritaire est rencontrée, tous les sons se trouvant dans 
la file correspondante sont annulés et celui qui est spécifié par l’ins- 
truction prioritaire est aussitôt transmis. Une telle instruction peut par 
exemple être utilisée pour interrompre une musique de fond et la 
remplacer par un bruit (explosion, etc.) lorsqu'un événement parti- 
culier se produit (superposition de deux figures à l'écran, etc.). 

La synchronisation entre deux notes jouées par l'intermédiaire de 
canaux différents (A et B par exemple) nécessite que : 


e la note jouée par le canal A ait son indicateur de synchronisation 
avec le canal B (bit 4) positionné ; 

e la note jouée par le canal B ait son indicateur de synchronisation 
avec le canal A (bit 3) positionné. 


Dans ces conditions, la file d'attente associée, selon le cas, à l’un 
ou l’autre des canaux sera interrompue jusqu’à attendre l’arrivée, en 
tête de l’autre file, de la note devant être synchronisée. 

La valeur à donner au paramètre de sélection du canal se calcule 
simplement en additionnant les valeurs décimales correspondant aux 
bits que l’on veut positionner en fonction de l’action souhaitée. Par 
exemple, l'instruction : 


SOUND 17,338,300 


génère une note jouée par le canal A et synchronisée avec une note 
provenant du canal B. Certaines valeurs données au paramètre de 
sélection du canal peuvent provoquer des incohérences. Par exemple, 
la valeur 9 correspond à l'émission d’une note via le canal À, qui 
doit être synchronisé avec lui-même. 


Période de ton 


Ce paramètre permet de sélectionner la période de la note émise 
(ou plus précisément celle du demi-ton, voir ci-dessus). La période 
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est un nombre entier positif compris entre O et 4095. Les périodes 
des demi-tons (et les fréquences correspondantes) sont données dans 
le manuel de l'utilisateur livré avec l'ordinateur. La valeur O permet 
de sélectionner le canal de bruit. 


Durée 


La durée est un paramètre optionnel dont la valeur doit être 
comprise entre —-32768 et 32767. Les valeurs positives correspon- 
dent à des centièmes de seconde. La valeur par défaut est 20, soit 
une durée de deux dixièmes de seconde. La valeur 0 indique que 
la durée est spécifiée par la commande d’enveloppe de volume (ENV). 
De même, une valeur négative indique le nombre de répétitions de 
l'enveloppe de volume. Pour une enveloppe correspondant à une 
durée de 10 centièmes de seconde (voir l'instruction ENV), la valeur 
— 8 donnée au paramètre ‘‘durée’’ de l'instruction SOUND permettra 
d'exécuter huit fois la commande ENV, soit une durée totale de 
80 centièmes de seconde. 

Lorsqu'une valeur positive est donnée au paramètre ‘‘durée’”’ de 
l'instruction SOUND et qu’une enveloppe de volume est en même 
temps sélectionnée, la durée spécifiée par l'instruction SOUND prime 
sur celle qui correspond à l’enveloppe de volume, en cas de non- 
identité des deux valeurs (voir le tableau donné en illustration de l'ins- 
truction ENV). 


Volume 


La valeur de ce paramètre peut être comprise entre 0 et 7 (valeur 
par défaut : 4) si aucune enveloppe de volume n’est sélectionnée, 
ou entre 0 et 15 (valeur par défaut : 12) si une enveloppe de volume 
est précisée. Le niveau du son peut être également réglé manuelle- 
ment à l’aide de la molette située sur le côté droit du boîtier de 
l’Amstrad. 


Numéro de l'enveloppe de volume 


Ce numéro doit être compris entre 0 et 15. La valeur par défaut 
est O, signifiant qu'aucune enveloppe de volume n'est sélectionnée 
(voir l'instruction ENV). 
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Numéro de l'enveloppe de ton 


Quinze enveloppes de ton différentes peuvent être définies au 
moyen d'instructions ENT. La valeur de ce paramètre (entre 0 et 15) 
permet d’en sélectionner une. La valeur par défaut est égale à O, c’est- 
à-dire qu'aucune enveloppe n’est sélectionnée. 


Période du bruit 


La valeur de ce paramètre optionnel peut être comprise entre 0 
et 31. Un bruit ‘’pur’’ est produit en donnant la valeur O au second 
paramètre de l'instruction SOUND et une valeur comprise entre 1 
et 31 à ce dernier paramètre. || est cependant possible de combiner 
un bruit avec des notes ou des tons plus conventionnels : il suffit de 
spécifier une valeur non nulle pour les deux paramètres ‘‘’période 
de ton’’ et ‘’période de bruit’. 
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a 


L'instruction ENV permet de sélectionner une enveloppe de volume. 


FORMAT 


ENV N° de l’enveloppe < ,section 1 > <,section 2 >. 
< ,section 5 > 


e Le N° d’enveloppe doit être compris entre 1 et 15. Ce paramètre 
permet de sélectionner une enveloppe particulière. 


e Les sections déterminent la forme de l'enveloppe. Une enveloppe 
peut contenir jusqu’à cinq sections. Chaque section comporte trois 
paramètres séparés les uns des autres par une virgule. Les trois para- 
mètres sont les suivants : 


Le nombre de pas de la section (entre O0 et 239). 

L’amplitude (volume) associée à chaque pas (entre —15 et +15). 
Une amplitude nulle correspond à la valeur O0. Une valeur posi- 
tive spécifie une augmentation d'amplitude, une valeur négative 
une diminution de cette amplitude. 

Le temps de pause, c'est-à-dire la durée du pas. Le temps de pause 
doit être compris entre O et 255, une unité correspondant à un 
centième de seconde. 


Une note jouée au piano est généralement assez bien reproduite 
si l’on utilise trois sections (attaque, tenue et chute de la note). 
L'attaque correspond à l'augmentation de volume résultant de la 
frappe de la touche. Le volume baisse ensuite lentement (tenue) pour 
s'éteindre rapidement lorsque l’on relâche la touche (chute). L'ins- 
truction ENV correspondante (enveloppe 1) pourra être la suivante : 


ENV 1,5,3,1,3,-1,3,3,3,1 
La forme d’une telle enveloppe est représentée sur la figure ci-dessous. 
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Volume 


1ère section 2ème section 3ème section 
5 pas d'amplitude 3 3 pas d'amplitude —1 3 pas d'amplitude 3 
temps de pause 1 temps de pause 3 temps de pause 1 
De —- - = ——— — > 











La durée totale spécifiée par l'enveloppe ainsi définie correspond 
à 17 centièmes de seconde ( (5x1)+(3x3)+(3x1) ). Lorsque cette 
durée totale (qui représente la somme pondérée des temps de pause 
qu’elle contient) diffère de la durée spécifiée par le troisième para- 
mètre de l'instruction SOUND associée, c’est la durée spécifiée par 
SOUND qui est généralement prépondérante. || existe néanmoins 
quelques exceptions. Le tableau suivant examine les différentes situa- 
tions qui peuvent se présenter (S représente la valeur du paramètre 
‘‘durée’’ de l'instruction SOUND et E représente la somme pondérée 
des temps de pause de l'enveloppe de volume sélectionnée) : 


Durée S (donc également E). 


Durée S. L'instruction ENV n'est pas complètement 
exécutée. 


Durée S. Le volume demeure constant durant les (S—E) 
derniers centièmes de seconde. 


Durée E. 


Durée SV. L'instruction ENV est exécutée S fois. 


Temps 
(1/100+ sec.) 





Lorsqu'une instruction ENV est exécutée, il convient de veiller à 
ce que la valeur du paramètre de volume reste positive sans qu'elle 
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excède 15. Il faut en effet savoir que cette valeur est cumulative (le 
volume spécifié pour le deuxième pas s'ajoute algébriquement à celui 
du premier, etc.). Lorsque le paramètre d'amplitude atteint la valeur 
16, il est automatiquement remis à 0. Cette remise à 0 s'effectue pour 
chaque valeur multiple de 16 (entre —-128 et +127). 
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a 


L'instruction ENT (enveloppe de ton) permet d'introduire une varia- 
tion de fréquence (vibrato) dans la note jouée. 


FORMAT 


ENT N° de l’enveloppe < ,section 1 > < ,section 2>... 
< ,section 5 > 


° Les paramètres ont la même signification que celle qui est donnée 
à propos de l'instruction ENV. Là encore, chaque section peut pos- 
séder trois paramètres, l'amplitude de l'instruction ENV devant 
simplement être ici remplacée par l’incrément de période de ton 
(valeur comprise entre —128 et +127), les valeurs négatives cor- 
respondant à une diminution de la période. 

Ilest cependant possible de ne spécifier que deux paramètres pour 
chaque section. Ceux-ci ont alors la signification suivante : 


Premier paramètre : période de ton. Une nouvelle valeur abso- 
lue est alors sélectionnée pour la période de ton (voir le second 
paramètre de l'instruction SOUND). 

Second paramètre : temps de pause, l'unité étant le centième 


de seconde et la valeur associée pouvant être comprise entre 
0 et 255. 


Un vibrato s'utilise habituellement pour simuler un instrument à 
cordes ou à vent, ou encore le son produit par une corde vocale. 
La percussion d’un marteau sur une corde de piano ne produit pas 
de vibrato. 
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La fonction SQ retourne l'état du canal sonore spécifié. 


FORMAT 
SQ(N° de canal) 
e Le numéro de canal peut prendre la valeur 1, 2 ou 4. 
La valeur retournée par la fonction SQ est comprise entre 0 et 255. 
Elle correspond à la valeur décimale d’un octet indicateur dont le 


positionnement des bits a la signification suivante : 


Bits O, 1 et 2 Nombre d'entrées disponibles dans la file d'attente 
du canal spécifié. 


Bit 3 Canal synchronisé avec le canal A. 
Bit 4 Canal synchronisé avec le canal B. 
Bit 5 Canal synchronisé avec le canal C. 
Bit 6 Canal en attente en début de file. 
Bit 7 Canal en activité. 
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TEE 


L'instruction ON SQ...GOSUB provoque un branchement vers un 
sous-programme lorsqu'une entrée est libre dans la file d'attente du 
canal spécifié. 


FORMAT 
ON SQ(N° de canal) GOSUB N° de ligne 


e Le N° de canal doit être compris entre 1 et 4 (1 pour le canal À, 
2 pour le canal B, 4 pour le canal C). 
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L'instruction RELEASE libère une attente spécifiée par une instruction 
SOUND. 


FORMAT 
RELEASE nombre entier 


e Le nombre entier doit être compris entre 1 et 7 : 


libération d’une attente sur le canal A 

libération d’une attente sur le canal B 

libération d’une attente sur les canaux A et B 
libération d’une attente sur le canal C 

libération d’une attente sur les canaux A et C 
libération d’une attente sur les canaux B et C 
libération d’une attente sur les canaux A, B et C 


NN OO 0  & © ND — 


EXEMPLE DE PROGRAMME 


Ce programme d'illustration permet de jouer n'importe quel mor- 
ceau de musique, les notes devant simplement être entrées en DATA 
dans le format suivant : 


XO,D,S 
X Nom anglo-saxon de la note (une lettre majuscule de l’alpha- 


bet, entre A et G). 


O Numéro de l’octave dans laquelle doit être jouée la note 
(chiffre compris entre 1 et 8). 


D Chiffre représentant la durée de la note. La durée effective 
de la note jouée sera obtenue (par le programme) en addi- 
tionnant la valeur de D et celle du paramètre TEMPO (fixée 


— 232 - 


à 10 dans notre exemple, mais pouvant être modifiée à loisir 
par l'utilisateur). 


S Paramètre de synchronisation, spécifiant avec quel canal la 

note doit (éventuellement) être synchronisée. 
Chaque ligne de DATA doit se terminer par une chaîne ‘‘””, en lieu 
et place d’un paramètre de synchronisation. Lorsque l’on veut spé- 
cifier un silence, la lettre indiquant le nom de la note doit être rem- 
placée par R. Les données correspondant au canal A doivent être écri- 
tes dans des instructions DATA dont les numéros de lignes sont 
compris entre 5000 et 5399. Celles qui correspondent au canal B 
doivent être écrites entre les lignes 5400 et 5699 et celles qui corres- 
pondent au canal C ont des numéros commençant à la ligne 5700. 
Les branchements sont effectués par le programme aux lignes 5000, 
5400 et 5700. La première instruction DATA de chaque canal doit 
donc être écrite à ce niveau. Pour chacun des trois canaux, la der- 
nière instruction DATA doit s’écrire (symbole de terminaison pour 
le programme) : 


DATA "0," " 


Dans l'exemple donné comme application de ce programme, seules 
les données correspondant au canal A ont été écrites. Le paramètre 
de synchronisation (lettre C) est donc inopérant dans ce cas. Pour 
pouvoir jouer sur les trois canaux, l’apostrophe située en tête de la 
ligne 30 doit être supprimée. Ces données reproduisent le thème de 
la chanson enfantine Ah ! vous dirai-je, Maman, sur lequel W.A. 
Mozart a composé plusieurs variations (K 265). Ce morceau est écrit 
en ut majeur et n'utilise donc pas d’altération (dièse et bémol). 


5 CLS 

FAIT(1)=-1: FAIT(Z)=-1L: FAIT (4)=-1 
NEVOI=E: TEMFO=10 

“SYNCHA=S: SYNCHB= 16: SYNCHC=EFE 
LOCATE 1,1 

FRINT "Attendez ! Je cherche le LA .. 





30 GOSUER 1000: ‘—-%# INITIALISATION xxx 
60 ON 4-NEVOI GOTO 70,80,90 

70 ON SG(4) GOSUER 4100 

80 ON SG(2) GOSUR 4050 

90 ON SG(i) GOSUE 4000 
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GS IF FAIT(1) AND FAIT(E) AND FAIT(4) TH 
EN 100 ELSE 95 
100 INFUT "ONE MORE TIME, LEON (OUI=0)"; 
LE 
120 IF UFFERE(Z#H)<5"0" THEN END ELSE FAI 
Té1)=0: FAIT (2) =0: FAIT (4) =0: NOTE (1) =0: NOT 
E (2) =0: NOTE (4) =0:GO0OT0O 60 
D99D HEURE EEE NE HEHEMEDE DE DE DE DE NE DER DE DE EX 
1000 INITIALISATION 
LOOL REED RER DE DE DE DE DE DE DE MEHR DE DE DEEE HER 
1010 DIM FERIOD (4,200) ,DUR (4,200) ,SYNC 
H{4,200) 
1020 FOR J=i TO NEVOI 
1050 CANALE=R" (J-1): NUMNOTES=0: FAIT(CAN 
AL) =0 

1060 IF CANAL=I THEN KRESTORE 5000 ELSE T 
F CANÂLEZ THEN RESTORE S400 ELSE IF CANA 
Led THEN KESTORE 5700 
1100 READ NOTE, DUREE, SYNCH# 
1110 IF NOTE#="" THEN 1500 

1£0 GOSUE 00: ex CALCUL FERIODE 4% 
NURNCT NUMNOTES + 1 
FERIOD (CANAL, NUMNOTES) &FERKTOD 
DUR (CANAL, , NUMNOTES) iJ + TEME( 
SYNCH (CANAL , NUMNOTES) &SYNCH 

























LRIOD (CANAL, 0) eNCIMNOTES 

NEXT J 

ENT —Lilsls7olol37 

RETURN 

EDR HE DE DE DER ENNEMI HE NE 
CALCUL OCTAVE ET NOTE 

RE RER DE DE DER HE NE HER HE EEE HER BEEN 

TÆEUNOTESX, 1) 

TES=INSTRC"C D E 









VAL CMIDE (NOT sesli)—s 
IF NOTESO THEN NGTE=0s: OGCTAVEZSOCTAYV 


GOSUR 5000 
SYNCHEC 
FÜR Fæei T0 LENCSYNCH#) 








io IF MIDE CSVNCHE EF Let Rt THEN SYNCIE 
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CSYNCHE SF, LESC" THEN SYNCHE= 


RETURN 

SEE HE DE DE MERE EN EE DE EEE RE HE DE RE BÉRE DE ORORE ENDENRX 
CALCUL DE LA FERIQODE 

MR URO HE RE HE DE DE DE EEE EE HER ER CRM RE RE ER EEK 










NOTE (CANAL) =NOTE (CANAL) +1 

VOLE: TONTONSE 

IND CANAL+SYNECH (CANAL , NOTE (CANAL) 
: LOD (CANAL , NOTE (CANAL) ) , DUR (CANAL , NO 

CANAL) ) , VOL ,0, TONTON 

o IF NOTE (CANAL) =PERIOD (CANAL. , 0) THE 
IT(CE JRN 











ON J GOTO 4400,44%0, 
4400 ON SQ(1) GOSUR 4000 
4410 RETURN 

440 ON SGCE) GOSUR 4080 

#50 RETURN 

4440 ON Sü(4) GOSUE 4100 

4450 RETURN 

HO0O DATA CS,83,CoRoty Ces 03 Cols 68,83€ 
Ras 000 3CsR os 08360 Cou s 5AS383C)GS, 
BC GC Re Chats Fos Gt 
R:2,,E5,8, C "R:2..É5,8, CKRszs" 

3010 DATA D5,8, C "R,2,,05,6, C.R,1,,E53230 
MolooC nr 16 Cote" 

5020 DATA 65,8, CoRotrs00 800235 FSC 
Fes 756 CIR,2,,È5,8, CRsrsse0 0 CR 
D5,8,C,R,2,,D5,6,00R,2, 65,8 CoR32 5 565 





1 
183CoRyg" 
SOIO DATA F5,8,C,R,2,,F75,03CoRa2s ES 3230 


) 

Se ne E5,2,C,DS5,2,C,E5,6,C.,R,1,,F 
524 Cahols ES 85 CoRo2 so DS 80 Ro 
5040 DATA C5,8,C, R,2,:C5,8:CoR5255658,C 
Ron 68 303 CR 08505 CoRycrs A0 0, C;, GS, 
8, C RI2,,65,8, C,R,2,,F5 CoRils 57930309 
R23 3838 C;, PRIZr SE sC 


fn £ñ = 


5399 DATA ‘",0," " 
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5400 ‘ notes pour le canal C KkkkIeXxx xx 


9300 DATA "",0," " 
5700 ‘ notes pour le canal C #k##k3exx 


3700 DATA "",0," " 
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La fonction SPACES$ fournit une chaîne formée de n espaces. 
FORMAT 
SPACES$(n) 


COMMENTAIRES 


La valeur retournée par cette fonction est une chaîne de caractères ; 
elle doit donc être stockée, si besoin est, dans une variable de chaîne. 


— 237 - 


SPC 


La fonction SPC génère, à l'écran ou sur l'imprimante, le nombre 
d'espaces correspondant à la valeur de son argument. 


FORMAT 
SPC(N) 


e N'est une expression numérique entière. 


COMMENTAIRES 
Cette fonction n’est utilisable qu'avec l'instruction PRINT. Elle est 


très utile, en liaison avec la fonction TAB, pour afficher ou imprimer 
des données présentées sous forme de tableau. 


EXEMPLE 


10 PRINT SPC(5) ‘Guide du BASIC" 
20 PRINT SPC(9) "AMSTRAD" 


L'expression ‘’Guide du BASIC’’ sera affichée à partir de la sixième 


colonne. AMSTRAD" s’écrira sur la ligne suivante, en commençant 
à la dixième colonne. 
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L'instruction SPEED INK initialise les durées d'apparition des couleurs 
intermittentes associées aux commandes BORDER et INK. 


FORMAT 
SPEED INK n1, n2 


e niet n2 sont des nombres entiers qui représentent respectivement 
les durées d'affichage de la première et de la seconde couleurs ; 
ces durées sont exprimées en 1/50 de seconde. 


EXEMPLE DE PROGRAMME 


Le programme suivant montre l'effet produit par des variations des 
paramètres de l'instruction SPEED INK : 


10 CLS 

20 BORDER 24,6 

30 FOR 1-20 TO 100 STEP 20 

40 FOR J-20 TO 100 STEP 20 
50 SPEED INK 1,J 

60 FOR K=1 TO 5000 : NEXT K 
70 NEXT J 

80 NEXT | 
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SPEED KEY 


L'instruction SPEED KEY modifie les paramètres contrôlant les réponses 
des touches du clavier. 
FORMAT 

SPEED KEY n1, n2 


e n1 représente le temps écoulé entre l'instant où la touche est pres- 
sée et celui où elle passe en mode répétition. 


e_n2 représente la période de la répétition. 
COMMENTAIRES 

Lorsqu'une touche du clavier est activée, un caractère est affiché 
sur l'écran ; si la pression est maintenue sur la touche, le caractère 
est répété. Les paramètres n1 et n2 sont exprimés en 1/50 de seconde 
(les valeurs par défaut sont 10 et 10) et peuvent prendre des valeurs 
comprises entre 1 et 255. La commande : 


SPEED KEY 1,1 


met en évidence l’effet de l'instruction. 
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SEAT 


L'instruction SPEED WARITE définit la vitesse d'enregistrement des 
données pour un stockage sur cassette. 
FORMAT 

SPEED WRITE n 


e n peut prendre la valeur O ou 1. 


COMMENTAIRES 


Deux vitesses de stockage sont disponibles : 1 000 bauds (1 000 
bits par seconde), qui correspond à la valeur 0 et 2 000 bauds, qui 
correspond à la valeur 1. 

Quels que soient les paramètres de stockage, l’Amstrad établit auto- 
matiquement la vitesse correcte sans intervention de l'utilisateur. La 
valeur par défaut est 1 000 bauds. 
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L'instruction STOP arrête l'exécution d’un programme et provoque 
le retour au mode commande. 


FORMAT 


STOP 


COMMENTAIRES 


Les instructions STOP peuvent être insérées après n'importe quelle 
autre instruction d’un programme. Elles en arrêtent l'exécution et le 
message suivant est alors affiché : 


Break in xxxxx 
(arrêt en xxxxx) 


xxxxx étant le numéro de la ligne où l'instruction STOP a été ren- 
contrée. A l'inverse de l'instruction END, STOP ne ferme pas les 
fichiers, de sorte que l'exécution normale du programme peut repren- 
dre là où elle s’est arrêtée. Pour ce faire, il suffit de taper la commande 
CONT qui signifie au programme de continuer (voir la description 
de cette commande). Les trois utilisations principales de l'instruction 
STOP sont les suivantes : 


1. Lors de la mise au point d’un programme, il est souvent utile d’insé- 
rer quelques instructions STOP en certains points de celui-ci, afin 
de vérifier que son exécution est correcte ou de localiser, le cas 
échéant, l'étape défectueuse. Puisqu’on est alors ramené en mode 
commande, il est possible d’afficher la valeur de paramètres ou 
de variables à cette étape du programme, en tapant au clavier la 
commande PRINT suivie du nom de la ou des variables en 
question. 


2. Lorsqu'un grand nombre d'informations ou de résultats doivent 
être affichés successivement à l'écran, leur défilement est parfois 


042 


trop rapide pour qu’ils puissent être lus par le programmeur. Par 
exemple, la séquence d'instructions suivante affiche la racine 
carrée des 100 premiers nombres, en allant chaque fois à la ligne : 


10 FOR X=1 TO 100 
20 PRINT SOR(X) 
30 NEXT X 


Ce calcul étant très rapide et l'écran disposant de moins de 100 
lignes d'affichage, les nombres défileraient sans pouvoir être lus. 
Cela peut être évité en ajoutant la ligne suivante : 


25 IF X/10 - FIX(X/10) = O THEN STOP 


qui provoquera l'arrêt de l'exécution du programme pour chaque 
valeur de X multiple de 10. 


. Pour permettre la mise sous tension d’une unité périphérique qui 
ne l’est pas nécessairement et qui est adressée directement par 
le programme (par exemple une imprimante). 
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La fonction STRINGS$ renvoie une chaîne formée de N fois le même 
caractère. 


FORMATS 


A$ = STRINGS(N,X$) 
A$ = STRINGS(N,X) 


e N'est une expression numérique comprise entre O et 255. 


e _X$ est une chaîne de caractères dont seul le premier sera utilisé 
par la fonction. 


e X est une expression numérique comprise entre 0 et 255 dont la 
valeur correspond au numéro de code ASCII du caractère qui sera 
stocké N fois dans la variable Af. 


COMMENTAIRES 


Cette fonction permet de définir une chaîne de caractères homo- 
gène, en spécifiant soit directement ce caractère (premier format), 
soit son numéro de code ASCII (second format). Une application pos- 
sible de la fonction STRING$ consiste à définir une chaîne traçant 
le cadre d’un tableau. Lorsque la chaîne X$ correspond à un espace, 
les fonctions SPACE$ et STRINGS$ sont équivalentes, comme dans 
l'exemple suivant : 


SPACE$(10) 
STRING$(10,"*") 


Les deux instructions suivantes sont équivalentes : 


PRINT STRING$(10,“*") 
PRINT STRING$(10,42) 
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Elles conduisent à l'affichage de : 


CELLELLELSLS. 


EXEMPLE DE PROGRAMME 


5 REM *#%x PROGRAMME STRINGS ##32%% 

10 CLS 

15 LOCATE 1,2 

20 At="-" 

350 FRINT STRING#(16,A#) "MENU"STRING#(16, 
At) 

40 FRINT STRING#(56,A#) 

50 FRINT 

60 FRINT "Choucroute mayonnaise" 

70 FRINT "Petit sale aux lentilles" 

89 PRINT ‘"Fommes de terre en robe de cha 
mbre "STRING#(1,'"#") 

90 PRINT "Nouilles garnies "STRINGS(2,'"*x 
nm) 

100 FRINT 

110 FRINT STRINGÉ(36,A#) 

120 LOCATE 2,12 

1350 FRINT STRING#(1,"#")" A certaines he 
ures seulement" 

135 LOCATE 2,15 

140 FRINT STRINGE(2,'"#")" Selon la fanta 
isie du patron" 

150 LOCATE 1,23 


Choucroute mayonnaise 
Petit sale aux lentil 
Pommes de terre en ro 
Nouilles garxrnies %#% 


æÆ À AS Cu pd heures seulement 
#Hæ Selon la antaisie du patron 
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La fonction STR$ convertit une expression numérique en une chaîne 
de caractères. 
FORMAT 

STR$(n) 


e nest une expression numérique. 


COMMENTAIRES 


Si nest un nombre négatif, il est retourné tel quel (avec son signe) 
par la fonction STR$. S'il s’agit d’un nombre positif dans lequel le 
signe + n'est pas précisé, un espace est automatiquement réservé 
dans la chaîne, à gauche du nombre. Par exemple, l'instruction : 


PRINT STR$(8.25),LEN(STR$(8.25)) 
conduit à l'affichage de : 
8.25 5 
Le nombre 8.25 est précédé d’un espace ; la chaîne retournée par 
la fonction STR$ comprend donc cinq caractères. 
La fonction STR$ permet d'effectuer sur des nombres des opéra- 


tions habituellement réservées aux chaînes. La fonction VAL effectue 
la conversion inverse (elle transforme une chaîne en un nombre). 
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STUNT UEIE 


L'instruction SYMBOL définit un caractère dont le numéro est spéci- 
fié suivant une matrice de 8 points sur 8. L’instruction SYMBOL AFTER 
indique la limite inférieure des caractères redéfinissables. 


FORMATS 


SYMBOL n° du caractère, liste d’octets 
SYMBOL AFTER limite inférieure 


° Le numéro du caractère doit être une valeur comprise entre la limite 
inférieure définie par l'instruction SYMBOL AFTER et 255. 


e Les caractères sont inscrits sur une matrice de 8 points sur 8, c’est- 
à-dire 8 rangées constituées d’un octet chacune ; la liste d’octets 
comprend donc 8 valeurs séparées par des virgules. 


e La limite inférieure est une valeur comprise entre 0 et 256 ; la valeur 
par défaut est 240. 


COMMENTAIRES 


Le BASIC Amstrad donne à l'utilisateur la possibilité de redéfinir 
des caractères ; le paramètre associé à SYMBOL AFTER a par défaut 
la valeur 240, c'est-à-dire qu’il est possible de redéfinir les caractères 
ayant pour codes les nombres 240 à 255 (16 caractères). Si ce nombre 
est insuffisant, il suffit de donner à l'instruction SYMBOL AFTER un 
paramètre qui diminue la limite inférieure : par exemple, pour redé- 
finir 100 caractères, il est possible d'écrire : 


10 SYMBOL AFTER 156 


Ainsi, les caractères dont les codes sont compris entre 156 et 255 
seront redéfinissables. 

Chaque caractère est représenté par une matrice de 8x8 points ; 
les points qui sont allumés ont la valeur 1, les points qui sont éteints 
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ont la valeur O. Par exemple, la lettre A du jeu de caractères Amstrad 
(dont le code ASCII est 65) est définie de la manière suivante : 


00011000 24 
00111100 60 
01100110 102 
01100110 102 
01111110 254 
01100110 102 
01100110 102 
00000000 0 


EXEMPLE DE PROGRAMME 


Dans le programme ci-dessous, l'instruction SYMBOL AFTER de la 
ligne 50 autorise la redéfinition des caractères dont les codes sont 
compris entre 140 et 255. Les lignes 260 à 310 redéfinissent les carac- 
tères ayant les codes 140 à 145. 

Les caractères 140, 141 et 142 sont concaténés dans la variable 
VOIT$ pour matérialiser la première et la dernière images de la voiture 
(lignes 410 et 420) ; il en est de même pour les caractères 143, 144 
et 145 qui sont concaténés dans la variable EXORVOITS$. 

Les instructions des lignes 400 et 550 sont particulières aux modèles 
CPC 664 et 6128 ; pour le modèle 464, il faut modifier les lignes de 
la manière suivante (ces modifications sont détaillées dans l'exemple 
de programme des instructions MOVE et MOVER) : 


365 CHR$(23)+CHR$(1) 
400 MOVE X2,Y1,2 
550 MOVE X2,Y1,2 


10 CLS 

20 MODE 1 
30 EORDER 7 
40 COUL=Ù 


30 SYMEOL AFTER 140 
60 GOSUR 150 

70 GOSUR 50 

80 FEN 1 

90 WHILE 1 

100 GOSUR 350 

110 TAGOFF 
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410 
EXORVOITE; 


20 

50 
440 
450 
480 
470 
480 
490 
500 
319 
520 
D30 
940 
330 
560 
570 


PRINT CHRE (7) 
WEND 
END 


INE O,1 

INE 1,24 

INK 2,20 

INE 3,24 

Y=20 : COUL=1 

FÜR X=100 TO 500 STEF 50 
GOSUE 470 

NEXT X 

RETURN 


SYMBOL 140,0,15,28,124,177,18,12,0 
SYMEOL 141,0,255,120,120 5,7 
SYMEUL 142,0,128,192,254,754, 
SYMEOL 14%,0,16,%6,122,128,55,20,0 
SYMEOL 144,0,0,1%7,157,0,1,0,0 
SYMEOL 145,0,128,64,2,2,716,80,0 
VOITÉ=CHRS (140) +CHRE (141) +CHRGE (142) 
EXORVOITH=CHRE (147) +CHR (144) +CHRE C1 








RETURN 


TAG 

Xi=O s Yi=200 

FOR X2=0 TO 550 STEF 2 

FRAME 

MOVE XE,Y1,2,1 

IF X2=0 THEN FRINT VOIT#S; ELSE FRINT 


IF X2=5890 THEN GOSUR 540 

C+E=" LL) 

WHILE CHe"t" s CH=INEEYE : WEND 
NEXT X2 

RETURN 


IF COUL=i THEN COUL=Z ELSE COUL=I 
FOR X2=X TO X+:0 STEF 2 

MOVE X2,Y 

DRAUR ©,260 , COUL. 

NEXT X2 


RETURN 
MOVE 550,V1,2,1 


FRINT VOIT#; 
RETURN 
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Un programme destiné à générer des caractères est donné enillus- 
tration de l'instruction KEY. 
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TAB 


La fonction TAB permet de positionner le curseur ou la tête de l’impri- 
mante par rapport au bord gauche de l'écran ou du papier. 


FORMAT 
TAB(N) 


e N'est une expression numérique entière. La valeur 1 correspond 
au bord gauche (colonne 1), la valeur 2 à la deuxième colonne, 
etc. TAB(0) est identique à TAB(1). 


COMMENTAIRES 


La fonction TAB ne s'emploie qu'avec l'instruction PRINT. Elle 
imprime des espaces jusqu’à ce que le numéro de colonne spécifié 
soit atteint. Cependant, si ce numéro de colonne est inférieur à la 
position courante du curseur ou à celui de la tête d'imprimante, la 
fonction TAB exécute d’abord un retour chariot avant de placer le 
curseur à la position définie. Les chaînes ou les valeurs à imprimer 
le seront donc à la ligne suivante (par rapport à la position courante 
du curseur au moment de l'appel de la fonction). Pour une utilisa- 
tion sur imprimante, la fonction TAB tient compte du format spécifié 
par l'instruction WIDTH. Pour un affichage à l'écran, la fonction TAB 
tient compte de la largeur de la fenêtre définie par WINDOW et du 
mode sélectionné (MODE). 

Lorsque la chaîne ou la valeur soumise à la fonction TAB ne peut 
s'écrire ou s'afficher sur une seule ligne, le curseur se positionne auto- 
matiquement au niveau de la première colonne (bord gauche de 
l'écran). 

La fonction TAB est particulièrement utile pour créer des tableaux 
dont les colonnes n’ont pas toutes la même largeur. 
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Exemple 


La manière dont opère la fonction TAB est illustrée par les quelques 
lignes de programme suivantes : 


10 MODE 1 

20 CLS 

30 LOCATE 1,1 

40 FOR 1-30 TO 45 

50 PRINT TAB{I) l;"SALUT" 
60 NEXT 


Le mode 1 sélectionne une largeur d'écran de 40 colonnes. Pour 
chaque valeur de | comprise entre 30 et 45 doit s'afficher la position 
de tabulation | gouvernée par TAB(I), suivie du mot SALUT. Pour une 
valeur de | donnée, 1 et SALUT doivent être écrits (quand cela est 
possible) sur une même ligne (puisque | est suivi d’un point-virgule). 
Par contre, un passage à la ligne est demandé après chaque mot 
SALUT (puisque cette chaîne n’est pas suivie d’un point-virgule). L'exé- 
cution de ce programme conduit à l'affichage suivant : 


38 SALUT 
31 SALUT 
32 SALUT 
33 
SALUT 
34 
SALUT 
35 
SALUT 
36 
SALUT 
37 
SALUT 


T 
UT 
LUT 
ALUT 


Pour les valeurs de | comprises entre 30 et 32, | et SALUT peuvent 
être écrits sur la même ligne et sont donc ainsi affichés. Lorsque | 
est compris entre 33 et 37, il n’y a plus assez de place pour les écrire 
tous deux sur la même ligne, à partir de la position de tabulation spé- 
cifiée. Il y a par contre suffisamment de place pour écrire la valeur 
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de I. C’est la raison pour laquelle | s'affiche à la position de tabula- 
tion spécifiée, alors que le mot SALUT est écrit à partir de la première 
colonne de la ligne suivante. A partir de 1=38, il n’y a plus assez de 
place pour écrire | au niveau de la position spécifiée. La valeur numé- 
rique et la chaîne s'inscrivent alors sur la ligne suivante (d’où la ligne 
vide). 

Notez que les nombres 38 à 40 apparaissent à partir de la colonne 
n° 2 (puisqu'il s’agit de valeurs numériques, une position de carac- 
tère est en effet réservée pour le signe, celui-ci n'étant pas affiché 
dans le cas de valeurs positives). A partir de 1=41, la position de tabu- 
lation TAB(I) dépasse le nombre de caractères par ligne du mode en 
cours (40 colonnes en mode 1). TAB(41) est alors automatiquement 
converti en TAB(1), TAB(42) en TAB(2), etc. 
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TAG et TAG OFF 


L'instruction TAG permet d'afficher des caractères (adressés à un canal 
particulier) sur des positions graphiques de l'écran. 

L'instruction TAG OFF annule la commande TAG précédente et affi- 
che les caractères à partir de la position courante du curseur. 


FORMATS 


TAG < # n° de canal > 


TAG OFF < # n° de canal > 


e n° de canal correspond à une fenêtre texte particulière (0 à 7) ; 
la valeur par défaut est O. 


COMMENTAIRES 


L'instruction TAG permet d'afficher un caractère à chacune des posi- 
tions du curseur graphique, c’est-à-dire à partir de chaque pixel de 
l'écran. Il ne faut pas oublier que la taille des pixels varie en fonction 
du mode (voir l'instruction MODE). Le tableau suivant indique les 
possibilités de positionnement du curseur texte et du curseur 
graphique en fonction du mode : 


Positions d'affichage Positions d'affichage 
Mode - 
en mode texte en mode graphique 


0 200 *x 160 = 32000 
200 * 320 64000 
200 + 640 = 128000 









EXEMPLE DE PROGRAMME 


Le programme illustrant les commandes SYMBOL et SYMBOL 
AFTER utilise une instruction TAG (ligne 360) pour générer l'affichage 
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des caractères représentant la voiture à la position en cours du cur- 
seur graphique. 

Le mode 1 est sélectionné (ligne 20) puis une boucle FOR déplace 
le curseur graphique de la position O à la position 550 avec un pas 
d'un pixel : 


380 FOR X2-0 TO 550 STEP 2 


Il faut se souvenir qu’en mode 1 la taille d’un pixel étant de 
2*2 points, pour se déplacer horizontalement d’un pixel, il faut que 
l’abscisse soit incrémentée de deux points. À chaque itération, une 
chaîne alphanumérique matérialisant la voiture est affichée à l'écran 
(ligne 410). Lorsque la largeur de l'écran a été parcourue, le sous- 
programme se termine et l'instruction TAG OFF replace l'affichage 
des caractères en mode texte normal. 
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TEST et TESTR 


Les fonctions TEST et TESTR renvoient le numéro de la couleur de 
l'encre dans laquelle est affiché un point de l'écran dont les coor- 
données graphiques absolues (pour TEST) ou relatives (pour TESTR) 
sont spécifiées. 


FORMATS 


TEST coordonnée x, coordonnée 


TESTR déplacement x, déplacement y 


COMMENTAIRES 


Les fonctions TEST et TESTR renvoient une valeur qui représente 
le numéro d'encre du point dont les coordonnées sont spécifiées ; 
ces valeurs sont donc comprises entre O et 15. 
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La fonction TIME renvoie le temps écoulé depuis la mise sous ten- 
sion de l'ordinateur ou le temps écoulé depuis la dernière initialisa- 
tion (RESET). 

FORMAT 


TIME 


COMMENTAIRES 

L'ordinateur Amstrad possède une horloge interne qui reçoit une 
impulsion tous les 1/300 de seconde ; le temps écoulé est donc 
exprimé en 1/300 de seconde. La commande : 


PRINT TIME/300 


affiche le temps en secondes depuis la dernière initialisation du 
système. 
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TRON/TROFF 


L'instruction TRON active l'affichage des numéros de lignes de pro- 
gramme exécutées. TROFF désactive ce mode. 


FORMATS 


TRON 
TROFF 


COMMENTAIRES 


L'instruction TRON est particulièrement utile au cours de la mise 
au point d’un programme. Il est ainsi possible de suivre la logique 
de son déroulement en examinant le numéro des lignes exécutées 
(c'est-à-dire en suivant la trace du programme). 

Le mode TROFF est le mode en service à la mise sous tension de 
l'ordinateur. Les instructions TRON et TROFF sont utilisables en mode 
programme comme en mode direct ; il est à noter que la commande 
RUN ne désactive pas le mode TRON si celui-ci est en service. 


Exemple 
110 TRON 
120 IF À > O THEN IF À > 100 THEN 150 ELSE 160 ELSE 170 
150 PRINT “A > 100":END 
160 PRINT ‘0 < À < =100":END 
170 PRINT “A < =0" 
180 TROFF 

Si À a par exemple la valeur 15, l'affichage suivant sera obtenu : 


(120) (160) 0 < À < =100 


signifiant que le programme a exécuté les instructions des lignes 120 
et 160. 
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La fonction VAL retourne les valeurs numériques se trouvant en tête 
d'une chaîne de caractères donnée comme argument à la fonction. 
FORMAT 


VAL(n$) 


COMMENTAIRES 


La valeur retournée est une valeur numérique (elle doit donc être 
stockée dans une variable de ce type). Les espaces et les tabulations 
sont automatiquement supprimés par la fonction VAL. Lorsque les 
premiers caractères de la chaîne n$ ne sont pas des chiffres, la fonc- 
tion retourne la valeur O. 

Lorsque n$ contient des nombres exprimés en notation binaire ou 
hexadécimale (donc précédés des préfixes &X ou &H), la valeur 
retournée est exprimée en décimal. 

La fonction STR$ effectue la conversion inverse de celle qui est réa- 
lisée par la fonction VAL. 


Exemples 
PRINT VAL("LEO PARRE,720 32 32") 

La valeur 0 est affichée (il n’y a pas de chiffre en tête de la chaîne). 
PRINT VAL("720 32 32,LE0 PARRE") 

Le nombre 7203232 est affiché (sans espaces intermédiaires). 
PRINT VAL("&HE00") 


Le nombre 3584 (soit E00 en hexadécimal) est affiché. 
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WAIT 


L'instruction WAIT suspend l'exécution d'un programme BASIC dans 
l'attente qu'un port du microprocesseur reçoive une valeur spécifiée. 


FORMAT 
WAIT n° de port,masque < ,inversion > 


e Le n° de port est une expression numérique entière comprise entre 
0 et 255. 


° masque est une valeur comprise entre 0 et 255 ; elle est utilisée 
pour réaliser une opération AND (ET) avec la valeur lue sur le port. 


e_ inversion est une valeur comprise entre O et 255 ; elle est utilisée 
pour réaliser une opération XOR (OÙ exclusif) avec la valeur lue 
sur le port. 


COMMENTAIRES 


Cette instruction constitue une boucle interne permettant d'attendre 
qu'un octet (l’octet 1 de l'instruction) ayant une configuration parti- 
culière soit reçu sur le port dont le numéro est spécifié. 

La comparaison est effectuée bit à bit au moyen de l'opérateur 
logique AND (voir la rubrique consacrée aux opérateurs logiques). 
L'exécution du programme n’est reprise que lorsque le résultat de 
l'opération : 


masque AND octet lu 
est différent de O. 
Le paramètre optionnel ‘inversion’ permet de tester spécifique- 
ment la position d’un bit de l’octet reçu sur le port. Lorsque cette 
option est retenue, l'opération logique suivante est réalisée par l’ins- 


truction WAIT : 
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(octet lu XOR inversion) AND masque 


L’exécution du programme ne se poursuit que lorsque le résultat 
de cette opération est différent de 0. L'opérateur XOR a pour effet, 
dans cette opération, de modifier l’octet lu avant que celui-ci ne soit 
comparé au ‘‘’masque’’. Selon la valeur donnée à l’‘’inversion’”, cette 
option permet de spécifier sur quel(s) bit(s) de l’octet lu doit être effec- 


tué le test logique AND. 
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WHILE/WEND 


Les instructions WHILE et WEND définissent une structure de boucle 
dans le programme. Cette boucle est exécutée tant qu’une condi- 
tion reste vérifiée. 


FORMATS 


WHILE expression logique 
. instructions 


WEND 


COMMENTAIRES 


Tant que l'expression logique est vraie, le bloc d'instructions compris 
entre les commandes WHILE et WEND est exécuté. 


EXEMPLE DE PROGRAMME 

Le programme de gestion de fichier d'adresses illustrant les instruc- 
tions OPENIN et OPENOUT utilise différentes structures WHILE 
WEND. A la ligne 240, les instructions WHILE WEND exécutent une 
boucle tant qu’un caractère n’a pas été tapé au clavier par l'utilisateur : 


240 WHILE C$="" : C$-INKEYS : WEND 


Puis une autre boucle est réitérée tant que le caractère de fin de 
fichier n'est pas rencontré : 


300 WHILE NOT EOF 
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Dans cette boucle, une ligne de données est lue dans le fichier 
‘’AGENDA'" puis assignée à la variable de chaîne T$(INC%). Avant 
chaque lecture, l'indice du tableau est incrémenté de 1 : 


310 INC%=INC% +1 
320 LINE INPUT #9,T$(INC%) 
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WIDTH 


L'instruction WIDTH permet de définir le nombre maximal de carac- 
tères pouvant être écrits sur chaque ligne par l'imprimante. 


FORMAT a 
WIDTH nombre de caractères 


e Le nombre de caractères doit être compris entre 1 et 255. 


COMMENTAIRES 


La valeur par défaut est 132. Lorsque le nombre de caractères spé- 
cifiés dans l'instruction a été imprimé, le BASIC envoie les caractères 
retour chariot (&HOA) et saut de ligne (&HOD) ; si le paramètre de 
l'instruction WIDTH est 255, ces deux caractères de fin de ligne sont 
supprimés. 
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WINDOW 


L'instruction WINDOW définit les caractéristiques d’une fenêtre texte 
sur l’écran pour un canal spécifié. 
FORMAT 


WINDOW < # n° de canal, > gauche, droite, haut, bas 


e gauche est le numéro de la première colonne. 


droite est le numéro de la dernière colonne. 


haut est le numéro de la première ligne. 


bas est le numéro de la dernière ligne. 


COMMENTAIRES 


Le numéro de canal est un nombre compris entre 0 et 7 ; s'il est 
omis, c'est le canal O0 qui est pris par défaut. 

Les numéros de colonnes et de lignes doivent être en accord avec 
le mode en cours : 


N° de colonne N° de ligne 
0 


1 à 20 1 à 25 
1 1 à 40 1 à 25 
2 1 à 80 1 à 25 





EXEMPLE DE PROGRAMME 


Ce programme est un utilitaire destiné à faciliter l'écriture d’un autre 
programme. Il permet en effet de faire défiler (scrolling), dans une 
fenêtre de l’écran, le listing déjà écrit pendant que la suite du pro- 
gramme est en cours d'écriture ou de modification dans une deuxième 
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fenêtre. Une troisième fenêtre (window #3) est utilisée pour afficher 
en haut de l'écran (en rouge sur fond jaune) la signification des trois 
touches fonction associées à cet utilitaire : 


° La touche f0 permet de faire défiler le listing dans la fenêtre supé- 
rieure (window #1). Le texte est écrit en noir sur fond vert. 


e La touche Esc permet d'arrêter le défilement obtenu au moyen 
de la touche fonction f0. Lorsque l’on appuie une seule fois sur 
Esc, le défilement est interrompu ; mais il peut être repris si l’on 
appuie sur n'importe quelle autre touche. Par contre, une seconde 
activation de la touche Esc interrompt définitivement le défilement 
en plaçant le curseur dans la fenêtre active de l'écran (fenêtre infé- 
rieure). La fenêtre active (window #0) est celle sur laquelle on peut 
écrire de nouvelles lignes de programme ou bien en modifier 
d'autres existant déjà. La fenêtre #0 reçoit également tous les 
messages générés par BASIC. Le texte s'inscrit en jaune sur fond 
noir, dans cette partie de l'écran. 


e La touche f1 permet de supprimer les fenêtres. La totalité de l'écran 
redevient ainsi active. Si l’on veut à nouveau travailler en mode 
multifenêtre, il suffit de taper la commande RUN 1000. 


La numérotation des lignes de cet utilitaire commence à la valeur 
1000 afin qu'il puisse être facilement fusionné (au moyen de la 
commande MERGE) avec n'importe quel autre programme. 


1000 CLS 

1010 INÉ O,OSINE L,OLINE 2,24: INE S,5 
1020 MODE 1 

1050 WINDOW #1,1,40,5,15 

1040 WINDOW #0,1,40,17,25 

1050 WINDOW #5,1,40,1,% 

1060 FAFER 1:FEN 2 

1070 CLS #3 

1080 LOCATE 1,3:FAFER #5,2 : PEN #3,3:PR 








INT #35," fO"SPC(12) "Esc'"'SFC(11)"F1"SF 
C(é6); 

1090 FRINT #3,"LIST fenetre" "  ARKET S 
crol." " SUFFRIM fen,. " 


1100 KEY 128,"cls #Hislist ,#1'"+CHRE (125) 
1110 CLS #0 

1120 KEY 129,"window 1,40,1,25:cls:list" 
+CHRE (135) 

1150 FEN 2:LOCATE 1,15 
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WINDOW SWAP 


L'instruction WINDOW SWAP permute le contenu des deux fenêtres 
spécifiées. 
FORMAT 

WINDOW SWAP n° de canal, n° de canal 


e n° de canal est une valeur entière comprise entre 0 et 7. 


COMMENTAIRES 


Cette instruction peut être utilisée au cours d'un programme pour 
transférer le contenu d’une fenêtre à un autre endroit de l'écran. Il 
est à noter que le symbole dièse ne doit pas être spécifié dans cette 
instruction. 
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MM 


L'instruction WRITE écrit des expressions dans un format particulier, 
sur le canal spécifié. 


FORMAT 
WRITE < # n° de canal, > liste d'expressions 


e La liste d'expressions est une liste de valeurs numériques ou alpha- 
numériques séparées par des virgules ou des points-virgules. 


COMMENTAIRES 


Le numéro de canal est un nombre compris entre 0 et 9 (8 spécifie 
l'imprimante tandis que 9 correspond à un fichier ouvert sur cassette 
où sur disquette). 

La commande WRITE insère des virgules entre les éléments affi- 
chés, place les chaînes de caractères entre guillemets et supprime 
les espaces avant et après les valeurs numériques. Le programme : 


10 A$="RAT" : B$="D'EAU" 
20 A=1267 : B=-17.146 

30 PRINT A$:B$:A;B 

40 PRINT 

50 WRITE A$:;B$;A;B 


génère l'affichage suivant : 


RATD'EAU 1267 17.146 
“RAT'","D'EAU",1267,17.146 
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XPOS et YPOS 


Les fonctions XPOS et YPOS renvoient respectivement les coordon- 
nées horizontale et verticale du curseur graphique. 


FORMATS 


XPOS 
YPOS 


COMMENTAIRES 


Ilexiste un curseur graphique totalement indépendant du curseur 
texte. Si le curseur texte peut être ou non affiché selon la valeur des 
paramètres de l'instruction CURSOR en cours, le curseur graphique 
n'est quant à lui jamais affiché. Les fonctions POS et VPOS ont la 
même signification, pour le curseur texte, que celle des fonctions 
XPOS et YPOS associées au curseur graphique. 
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AE 


L'instruction ZONE permet de modifier les tabulations associées à 
la commande PRINT. 


FORMAT 


ZONE expression numérique 


e L'expression numérique est un nombre compris entre 1 et 255. 


COMMENTAIRES 


Lorsque la virgule est utilisée comme séparateur dans l'instruction 
PRINT, celle-ci génère des tabulations de 13 caractères ; si les expres- 
sions sont inférieures à 13 caractères, l'affichage débute sur les 
colonnes 1, 14 et 27 en Mode 1. L'instruction ZONE permet de modi- 
fier la valeur de cette tabulation automatique. Par exemple : 


10 MODE ! 
20 ZONE 10 
30 A$-"*" 
40 PRINT AS,AS,ASAS,A$ 


place les tabulations sur les colonnes 1, 11, 21 et 31 et génère l’affi- 
chage suivant : 


Si le mode 2 avait été spécifié, les tabulations auraient été définies 
sur les colonnes 1, 11, 21, 31, 41, 51, 61 et 71. 
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La fonction @ est un pointeur de variable. Elle retourne l'adresse du 
premier octet où est stockée, en mémoire centrale, la valeur d'une 
variable numérique ou celle du descripteur de chaîne dans le cas 
d’une variable alphanumérique. 


FORMAT 
x = @ variable 


e variable peut être un nom de variable numérique ou de variable 
de chaîne. Il peut s'agir d’une variable indicée où non indicée 
(scalaire). Elle doit être définie avant que la fonction @ ne soit 
appelée. 


e L'adresse x retournée par la fonction est un nombre entier compris 
entre — 32768 et 32767. Si ce nombre est négatif, l'adresse absolue 
est obtenue en ajoutant 65536 à x. 


COMMENTAIRES 


Pour comprendre la manière dont l’Amstrad gère le stockage et 
l’utilisation des variables, il est nécessaire de distinguer plusieurs élé- 
ments. Il ne suffit pas en effet que la valeur de la variable soit stockée 
en mémoire centrale ; encore faut-il avoir un moyen d'associer la 
valeur à la variable en question lorsque celle-ci est appelée dans un 
programme. C'est la raison pour laquelle la zone de stockage d’une 
variable est formée de deux groupes d'octets contigus : 


e Le premier (situé vers la partie basse de la mémoire) correspond 
au descripteur de la variable. Celui-ci renferme les codes définissant 
le type (entier, réel, chaîne de caractères, tableau) et le nom de 
la variable. Dans le cas d’un tableau, le descripteur contient aussi 
des informations codées concernant l’organisation de ce tableau. 


e Le second contient, sauf dans le cas d’une variable de chaîne, la 
valeur de la variable. Dans le cas d’une variable de chaîne, ce 


- 271 - 


second groupe d’octets contient le descripteur de la chaîne (voir 
ci-dessous) et non la valeur qui lui est affectée. Les notions de 
descripteur de chaîne et de descripteur de variable ne doivent pas 
être confondues. 


La fonction @ retourne toujours l’adresse du premier octet de ce 
second groupe, c'est-à-dire l'adresse du premier octet correspondant 
soit à la zone de stockage de la valeur de la variable, soit à celle du 
descripteur de chaîne. Cette adresse sera notée &A dans les explica- 
tions données ci-dessous. 


Le descripteur d'une variable numérique 
ou d'une variable de chaîne 


La structure de ce descripteur est la suivante (en allant du haut vers 
le bas de la mémoire) : 


Octet d’adresse &A - 1 


Code du type de la variable. 
La valeur 1 correspond à une variable entière, 2 à une variable de 
chaîne et 4 à une variable réelle. 


Octet d’adresse &A -— 2 


Code de la valeur ASCII augmentée de 128 (décimal) du dernier 
caractère formant le nom de la variable. 


Octet d’adresse &A — 3 


Code de la valeur ASCII de l’avant-dernier caractère formant le nom 
de la variable. 


Octet d’adresse &A-n 


Code de la valeur ASCII du premier caractère formant le nom de la 
variable. 


Par exemple, le descripteur de la variable de chaîne AMSTRADS$ 
(qui sera un nom de variable et non une valeur) sera : 
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&A-8 &A-7 &A-6 &A-5 &A-4 &A-3 &A-2  &A-1 Adresse 
65 77 83 84 82 65 196 2 Valeur décimale 
A M S T R A D+128 Code ASCII 


Ces correspondances peuvent être affichées à l'écran à l’aide des 
quelques lignes de programme suivantes : 


10 AMSTRAD$ =" 

20 FOR 1=8 TO 1 STEP -1 
30 A= @AMSTRADS 

40 C=PEEK(A-I) 

50 PRINT [,C,CHR$(C) 

60 NEXT | 


L'avant-dernière valeur affichée dans la colonne CHRS sera natu- 
rellement incorrecte (il faut retirer 128 pour avoir le véritable numéro 
de code ASCII). 


Le descripteur d'une variable de tableau 


Les éléments figurant dans le descripteur d’une variable de tableau 
(par exemple A(I,J)) sont les suivants (en commençant par la partie 
basse de la mémoire et en allant vers les adresses élevées) : 


e Le nom du tableau, la première lettre de ce nom ayant la plus petite 
adresse. La valeur correspondant à la dernière lettre du nom est 
augmentée de 128 (décimal) par rapport au numéro de code ASCII 
qui lui est associé. 


e Le numéro (codé sur un octet) du type de la variable (1, 2 ou 4). 


e La valeur du déplacement, codée sur deux octets. Le déplacement 
correspond au nombre d’octets séparant le champ ‘‘Valeur du 
déplacement’” du champ codant pour la valeur de la variable. La 
valeur du déplacement se calcule de la manière suivante : 


1 + 2 x (nombre d'indices dans le tableau) 
+ (nombre d’octets pour stocker un élément) x (nombre 
d'éléments) 


e Le nombre d'indices (codé sur un octet) dans le tableau (par exem- 
ple la valeur 2, dans le cas d’un tableau du type A(,J)). 
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Le nombre (codé sur deux octets) d'éléments se rapportant au pre- 
mier indice (par exemple la valeur 5 dans le cas d’un tableau 
A(5,16)). 


Le nombre d'éléments se rapportant au deuxième indice. 


Le nombre d'éléments se rapportant au dernier indice. 


Par exemple, le descripteur du tableau numérique à une dimen- 
sion (ou vecteur) FIC(10) aura la structure : 


&A-9 &A-8 &A-7 &A-6 &A-5 &A-4 R&A-3 &A-2 &A-1 Adresse 
70 73 195 4 58 0 1 11 0 Valeur déc. 


Les valeurs correspondant à ce descripteur peuvent être affichées 
à l'écran au moyen du programme suivant : 


10 DIM FIC(10) 

20 FOR 1-9 TO 1 STEP -1 
30 A- @FIC(0) 

40 PRINT I,PEEK(A-I) 

50 NEXT | 


Les correspondances observées ont la signification suivante : 


70 Numéro de code ASCII de la lettre F. 
73 Numéro de code ASCII de la lettre 1. 
195 Numéro de code ASCII + 128 de la lettre C. 


4 Code correspondant à des valeurs réelles (tableau 
numérique). 


58 Valeur du déplacement (=1+2x1+5x11). 


O  Octet de poids fort du champ ‘‘valeur de déplacement”. 
La valeur du déplacement étant inférieure à 128, cet octet 


vaut 0. 
1 Nombre d'indices (un seul pour un vecteur). 
11 Nombre d'éléments se rapportant au premier (et ici au seul) 
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indice. Il y a effectivement 11 éléments puisque la numé- 
rotation commence à O (éléments FIC(0) à FIC(10)). 


Les valeurs des variables numériques 


Les valeurs des variables entières sont stockées sur deux octets 
consécutifs en mémoire centrale (octets d'adresses &A et &A+ 1, pour 
un scalaire) ; les valeurs des variables numériques réelles sont stockées 
sur cinq octets consécutifs. Dans les deux cas, l’octet de poids faible 
est celui dont l'adresse est la plus basse. Les valeurs d’un tableau 
numérique sont stockées les unes à la suite des autres, en commen- 
çant par les valeurs correspondant aux indices O. 

La manière dont la valeur d’une variable réelle est codée sur les 
cinq octets qui lui sont réservés est assez lourde à détailler. Elle ne 
sera pas présentée ici, l'utilisateur intéressé ne devant avoir aucune 
peine à établir les correspondances au moyen de petits programmes 
semblables à ceux qui sont donnés ci-dessus. Signalons seulement 
que le bit 7 de l’octet d'adresse &A +3 code pour le signe du nombre 
(ce bit vaut O pour un nombre positif et 1 pour un nombre négatif). 


Les descripteurs de chaînes des variables alphanumériques 


Les variables de chaîne sont stockées de manière dynamique en 
mémoire centrale. À chaque variable de ce type est associée une suite 
de trois octets appelée ‘‘descripteur de chaîne’’. La valeur du pre- 
mier octet du descripteur représente la longueur de la chaîne ; les 
deux octets suivants contiennent l'adresse où est stockée la chaîne 
en mémoire, l’octet de poids faible ayant l'adresse la plus basse. 
Comme indiqué plus haut, la fonction @ retourne l'adresse du pre- 
mier octet du descripteur de chaîne d’une telle variable. 

Le programme donné ci-dessous permet d'afficher à l'écran l'endroit 
où est stockée, en mémoire centrale, une variable de chaîne entrée 
au clavier (il s’agit de l'adresse de la chaîne elle-même, et non de 
celle de son descripteur). 


10 INPUT “Entrez une chaîne de caractères quelconque ";a$ 
15 A= @a$ 

20 B=PEEK(@ +1)+(PEEK(@ +2)*256) 

30 PRINT ‘Adresse de la chaîne en mémoire :"”;B 

40 END 
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ABS, 90 

Adresse, 27, 190 
AFTER, 32 

Algorithme de tri, 162 
AND, 182 

Argument, 27 

ASC, 36 

ASCII (voir codes ASCII) 
ATN, 90 

AUTO, 38 


BIN$, 40, 41 
Bit, 27, 190 
BORDER, 43 
Branchements et boucles, 15 


CALL, 44 

CAT, 45 

Caractères génériques, 56 
CHAIN, 46 

CHAIN MERGE, 46 
Chaîne, 27 

CHR$, 48 

CINT, 90 

CLEAR, 49 

CLEAR INPUT, 50 

CLG, 51 

CLOSEIN, 52 

CLOSEOUT, 52 

CLS, 53 

Codes ASCII, 27, 36, 48 
Couleurs, 43, 123, 189, 192 
Commandes AMSDOS, 54 
Concaténation, 27 

CONT, 60 

Conventions d'écriture, 17 
Copy (touche), 25 
COPYCHR$, 61 

COS, 90 

CP/M, 11 

CREAL, 90 

Ctrl (touche), 25 
CURSOR, 62 


DATA, 205 
DEC$, 64 


INDEX 


Défaut (valeur par), 27 
DEF FN, 67 

DEFINT, 69 

DEFREAL, 69 

DEFSTR, 69 

DEG, 71 

Del (touche), 25 
DELETE, 72 

DERR, 74 

DI, 75 

Descripteur de chaîne, 271 
DIM, 76 

DRAW, 78 

DRAWR, 78 


EDIT, 82 

Éditeur Amstrad, 24 
El, 75 

ELSE, 120 

END, 83 

Enter (touche), 24 
ENT, 229 

ENV, 226 

EOF, 84 

ERASE, 85 

ERL, 106 

ERR, 106 

ERROR, 106 

Esc (touche), 39, 60 
EVERY, 88 

EXP, 90 


Fichier, 16, 27, 52, 176 
Fichier binaire, 149 

Fichier (nom de), 54 

Fichier d'adresses, 177 

FILL, 96 

FIX, 90 

FN, 67 

Fonctions arithmétiques, 90 
FOR, 98 

FORMAT (Commande CP/M), 58 
Formatage d’une disquette, 58 
FRAME, 103 

FRE, 104 
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Gestion des erreurs, 106, 74 
GOSUB, 111 

GOTO, 113 

Graphisme Amstrad, 17 
GRAPHICS PAPER, 114 
GRAPHICS PEN, 114 


HEX$, 40 
HIMEM, 119 


IF... GOTO...ELSE, 120 
IF... THEN...ELSE, 120 
INK, 123 

INKEY, 125 

INKEY$, 126 

INP, 127 

INPUT, 128 

INSTR, 130 
Instruction, 22, 28 
INT, 90 





JOY, 132 
Joystick, 132 


KEY, 134 
KEY DEF, 138 


Langage machine, 28, 44, 119, 156 
LEFT$, 140 

LEN, 142 

LET, 143 

LINE INPUT, 145 
LIST, 147 

LOAD, 149 
LOCATE, 150 
LOG, 90 
LOG10, 90 
LOWER, 151 


MASK, 152 

MAX, 90 

Mémoire RAM, 28 
Mémoire ROM, 28, 44 
Mémoire écran, 154, 217 
MEMORY, 154 

MERGE (voir aussi CHAIN MERGE), 157 
Microprocesseur, 10 

MID$, 159 

MIN, 90 

Minuscules accentuées, 135 


Mise en forme de l'affichage (écran et 
imprimante), 15 

MOD, 167 

MODE, 168 

Mode direct, 21 

Mode programme, 21 

Modification d’un programme, 24, 72, 82 
Mot clé, 22, 28 

MOVE, 169 

MOVER, 169 


NEW, 171 

NEXT, 98 

Nombres aléatoires, 175, 214 

NOT, 182 

Notation binaire et hexadécimale, 40 


Octet, 28, 41, 190 

ON BREAK CONT, 174 
ON BREAK GOSUB, 174 
ON BREAK STOP, 174 
ON ERROR GOTO, 106 
ON...GOSUB, 172 
ON...GOTO, 172 

ON SQ...GOSUB, 231 
OPENIN, 176 
OPENOUT, 176 
Opérateurs logiques, 182 
OR, 182 

ORIGIN, 188 

OUT, 127 


PAPER, 189 

PEEK, 190 

PEN, 192 

PI, 193 

PLOT, 194 
PLOTR, 194 
POKE, 198 

POS, 199 

PRINT, 201 

PRINT USING, 203 
Programme, 28 
Programmation des manettes de jeu, 132 


RAD, 71 
RANDOMIZE, 214 
READ, 205 
RELEASE, 232 
REM, 208 
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REMAIN, 209 UNT, 90 


RENUM, 210 UPPERS, 151 
RESTORE, 212 

RESUME, 106 VAE 287 
RETURN. 111 Variable, 29, 69, 144 
Retour chariot (touche), 24 VPOS, 199 
RIGHTS, 140 WAIT, 260 
RND, 214 WEND, 262 
ROUND, 90 WHILE, 262 
RUN, 215 WIDTH, 264 
DA SGA WINDOW, 265 
No WINDOW SWAP, 267 
Shift (touche), 25 NS 
SIN, 90 XOR, 182 

Son Amstrad, 218 XPOS, 269 
SOUND, 222 

SPACES, 237 YPOS, 269 
SPC, 238 

Spécification de fichier, 54, 149 NES 
SPEED INK, 239 @, 271 

SPEED KEY, 240 

SPEED WRITE, 241 AURA 

<Q, 230 &X, 40 

SQR, 90 A, 56 

STEP, 98 1B, 56 
Stockage et chargement d'un pro- | DRIVE, 56 
gramme, 15 | CPM, 56 
STOP, 242 | DIR, 57 
STRINGS, 244 1 DISC, 57 
STR$, 246 1 DISC.IN, 57 
SWAP, 267 1 DISC.OUT, 57 
SYMBOL, 247 ERA, 57 
SYMBOL AFTER, 247 |REN, 57 
Système d'exploitation, 11, 29, 54 | TAPE, 58 
pose ! TAPE.IN, 58 
nn  TAPE.OUT, 58 
TAG OFF, 254 LASER 98 
TAN, 90 

TEST, 256 

TESTR, 256 

THEN, 120 

TIME, 257 

TROFF, 258 

TRON, 258 
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